newdata3 <- c(HAmort[3],HFmort[3],PNEUmort[3])
names(newdata3) <- c("Heart Attack Mortality Rate","Heart Failure Mortality Rate","Pneumonia Mortality Rate" )
barplot(newdata3,cex.names = 1,main="Mortality Rate for different illness in ST Rose Hospital",
xlab = myfinaldata$Hospital.Name[3], ylab = "Mortality Rate",ylim= range(0:20))
textxy()
嗨,我可以知道如何在函数textxy中键入什么代码,以便我可以得到这样的内容: