Coursera-R Programming week4编程作业

博客内容概述了作者完成Coursera上的R Programming课程第四周的编程任务,包括Task 2, Task 3和Task 4。" 114330740,8666687,JetBrain 软件高效快捷键指南,"['JetBrains', 'IDEA', 'PyCharm', '开发工具', '快捷键']
摘要由CSDN通过智能技术生成

Task 2

best <- function(state, outcome) {
   
    ## Read outcome data
    outdata <- read.csv("outcome-of-care-measures.csv", colClasses = "character")
    usefuloutcome <- outdata[, c(2, 7, 13, 19, 25)]
    ## Check that state and outcome are valid
    
    ## Return hospital name in that state with lowest 30-day death rate
    ## select corespond information
    ## assume we need State AL attack 这里行和列的选择都要输入参数
    if(outcome == "heart attack"){
   
        i <- 3
    }else if(outcome == "heart failure"){
   
        i <- 4
    }else{
   
        i <- 5
    }
    useful1 <- usefuloutcome[which(usefuloutcome$State == state), c(1, i)]
    useful2 <- as.numeric(useful1[, 2]
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值