通过参数R获取方法列表
我有如下数据:通过参数R获取方法列表,r,R,我有如下数据: > head(chf) Admit.Day.of.Week Type.of.Admission Patient.Disposition 1 SAT Emergency Skilled Nursing Home 2 FRI Elective Home or Self Care 3 FRI
> head(chf)
Admit.Day.of.Week Type.of.Admission Patient.Disposition
1 SAT Emergency Skilled Nursing Home
2 FRI Elective Home or Self Care
3 FRI Emergency Home w/ Home Health Services
4 MON Emergency Skilled Nursing Home
5 THU Emergency Home or Self Care
6 WED Emergency Skilled Nursing Home
mean_los_dispo
1 8.553525
2 4.224193
3 5.789052
4 8.553525
5 4.224193
6 8.553525
我使用以下命令来获取标记为mean\u los\u dispo
# Mean LOS for each patient disposition
chf$mean_los_dispo <- ave(chf$Length.of.Stay, chf$Patient.Disposition,
FUN = mean)
我该怎么做呢?我希望最终能够使用粘贴或类似的方法将信息放在图表的标题中。您可以使用粘贴。例如,我创建了两个变量,一个是数字(即你的平均值),另一个是字符(即你的配置),然后我使用粘贴将它们连接起来:
a<-c(1,2,3,4,5)
b<-c("a","b","c","d","e")
strs<-paste(b," = ",as.character(a),sep="")
在您的情况下,您可以执行以下操作:
unique(paste(chf$Patient.Disposition," = ",as.character(chf$mean_los_dispo),sep=""))
unique将消除所有重复项。感谢您的帮助,在您使用
unique
展示的第二个解决方案中,是否可以首先使用round()
之类的方法设置digists=2
?这比我为每个配置创建daata.frame的漫长过程要短得多。是的,只需将其放入as.character:as.character(圆形(chf$mean\u los\u dispo,2))
[1] "a = 1" "b = 2" "c = 3" "d = 4" "e = 5"
unique(paste(chf$Patient.Disposition," = ",as.character(chf$mean_los_dispo),sep=""))