类从“字符”到“数字”的更改不正确

Question

我遇到了问题。我需要将最后一列（dat [，11]）显示为数字，然后需要从较小到较大的排序。

此代码可以使用并更改为数字格式，但其中的数字根本与原始数据不匹配。

你知道问题是什么吗？

dat <- read.csv("outcome-of-care-measures.csv", na.strings="Not Available", stringsAsFactors = FALSE)
ha <- c("heart attack")

heart_attack_all <- if(outcome == ha) {
  ha_a <- as.data.frame(cbind(dat[, 2], ## hospital
                        dat[, 7], ## state
                        dat[, 11])) ## heart attack
colnames(ha_a) <- c("hospital name", "state", "outcome")
ha_a[, 3] <- as.numeric(ha_a[, 3])
return(ha_a) 
}

如果您需要CSV文件，可以找到here.

非常感谢！