我想用ggplot绘制一个表,但似乎无法设法丢失row.names.
我试过了:
row.names(cov_table_a)<-NULL # outside the plot
row.names = FALSE # inside the annotation_custom
这是我的数据:
cov_table_a<-
structure(list(Year = structure(1:16, .Label = c("1970", "1971",
"1972", "1973", "1974", "1975", "1977", "1979", "1980", "1981",
"1982", "1983", "1984", "1985", "1986", "1987", "1988", "1990",
"1991", "1992", "2000", "2001", "2003", "2004", "2007", "2008",
"2009", "2010", "2011", "2012", "2013", "2014"), class = "factor"),
`Percentage \nof missing data` = structure(c(4L, 2L, 4L, 6L,
1L, 12L, 5L, 21L, 21L, 11L, 10L, 13L, 9L, 17L, 18L, 14L), .Label = c("0%", …我有两个结构相同的数据框(相同数量的行,列和相同的标题).我想要做的是将两者合并为一个具有逗号分隔列的数据框.
我知道如何使用这些虚拟数据帧,但在我自己的数据上使用它将非常麻烦.
这是我的虚拟数据帧,我的"真实"数据的标题是"1","2","3"等,而虚拟数据帧的标题是"X1","X2","X3"等.
> data1
X1 X2 X3 X4
1 1 2 3 4
2 2 3 4 5
3 3 4 5 6
> data2
X1 X2 X3 X4
1 8 9 13 14
2 9 10 14 15
3 10 11 15 16
我想要的是什么:
>data3
new1 new2 new3 new4
1 1,8 2,9 3,13 4,14
2 2,9 3,10 4,14 5,15
3 3,10 4,11 5,15 6,16
我是如何设法得到这个输出的.但是,对于我认为的大型数据集来说,它太麻烦了.
data1<- data.frame('1'=1:3, '2'=2:4, '3'=3:5,'4'=4:6)
data2<- data.frame('1'=8:10, '2'=9:11, '3'=13:15,'4'=14:16)
names(data1) <- c("1a","2a","3a","4a")
names(data2) <- …