1、创建数据集
hospital <- c("New York", "California")patients <- c(150,350)
costs <- c(3.1,2.5)
df <- data.frame(hospital, patients, costs)
2、创建新的变量
df$totcosts <- df$patients * df$costs
3、改变变量的名称
df$costs_euro <- df$costs
df$costs <- NULL
df$patients <- ifelse(df$patients==150,100,ifelse(df$patients==350,300,NA))
4、合并数据集
finaldt <- merge(dataset1, dataset2, by="id")
或者
finaldt <- cbind(dataset1, dataset2)
finaldt <- rbind(dataset1, dataset2)
5、子数据集
dt <- iris[,c("Sepal.Length" ,"Sepal.Width")]
dt <- iris[,c(-2,-3)]#去除第2、3列变量数据
dt2<- subset(dt,Age>40&Sex==men)#对数据集dt筛选满足条件的数据
在当前图形区域的四个边缘之一,显示文本。mtext(text, side = 3, line = 0, outer = FALSE, at = NA, adj = NA, padj = NA, cex = NA, col = NA, font = NA, ...)text是文本内容。side指定是哪个页边空白(1=下面,2=左边,3=上边,4=右边)。line指定文字出现的位置,文字和对应坐标轴平行。从坐标轴开始向外从0开始计数。具体设为多少合适需要自己尝试。at,以用户坐标指定字符串位置。adj 调整阅读方向。为使字符串平行坐标轴,adj=0,意味着左对齐或下对齐,而adj=1表示右对齐或上对齐。padj 调整每个字符串垂直阅读的方向(它通过adj控制)。对于平行轴的字符串, padj=0表示右或上对齐,padj=1表示左或下对齐。cex字体大小因子,默认为1,实际输出字体相对于默认字体的大小比例,得尝试才知道设为多少合适。font文字字体。 col是色彩。