强制/编辑gridExtra

我正在使用一个数据集，其中X中存在的变量只有两个可能的值-2009或2010。

2009,01,52.4
2009,49.5
2009,53.2
2009,48.2
2009,53.9
2009,42.8
2009,56.4
2009,57
2009,50.3
2009,57.4
2009,45.2
2009,55
2009,47.1
2009,42.2
2009,57.1
2009,51.7
2009,56.8
2009,56.9
2009,52.9
2009,45
2009,52.8
2009,52
2009,55.1
2009,53.3
2009,55.2
2009,55.9
2009,02,54.7
2009,53.1
2009,54.2
2009,56.2
2009,58.5
2009,50.9
2009,57.7
2009,54.1
2009,54.5
2009,55.3
2009,53.4
2009,53.8
2009,51.3
2009,52.3
2009,53
2009,53.6
2009,52.5
2009,50.1
2009,52.2
2009,54.3
2009,52.7
2009,03,58.7
2009,58.2
2009,63
2009,55.4
2009,55.8
2009,63.8
2009,56
2009,55.6
2009,59.9
2009,54.9
2009,61.8
2009,55.5
2009,66.4
2009,55.7
2009,04,60
2009,57.5
2009,57.6
2009,54
2009,54.8
2009,53.5
2009,56.7
2009,57.2
2009,57.8
2009,57.3
2009,05,59.8
2009,58.9
2009,59.3
2009,60.4
2009,59.1
2009,73.4
2009,62.5
2009,61.4
2009,61.1
2009,61.6
2009,67.6
2009,66.5
2009,58.6
2009,62
2009,72.1
2009,59.6
2009,61
2009,59.2
2009,60.1
2009,62.6
2009,60.9
2009,59.5
2009,06,65.4
2009,64.7
2009,64
2009,65.8
2009,68.3
2009,63.9
2009,64.2
2009,61.9
2009,62.9
2009,69.7
2009,63.7
2009,63.4
2009,64.5
2009,64.4
2009,66.6
2009,70.3
2009,67.1
2009,65.5
2009,63.3
2009,66.3
2009,66.7
2009,07,64.8
2009,66
2009,66.8
2009,69.9
2009,65.9
2009,68.6
2009,65
2009,67.4
2009,68
2009,64.1
2009,08,66.1
2009,64.9
2009,65.1
2009,65.2
2009,67
2009,65.6
2009,64.6
2009,09,63.1
2009,65.3
2009,70.9
2009,70.1
2009,68.1
2009,65.7
2009,63.2
2009,67.5
2009,10,69.4
2009,71.1
2009,66.9
2009,67.2
2009,62.4
2009,64.3
2009,61.2
2009,68.5
2009,11,58.4
2009,59.4
2009,62.7
2009,61.5
2009,62.2
2009,60.5
2009,60.6
2009,58.1
2009,12,45.6
2009,59.7
2009,58
2009,56.5
2009,60.3
2009,50.6
2009,62.3
2009,40.6
2009,48.1
2009,61.3
2009,52.6
2009,51.9
2009,55.9
2010,57.8
2010,45.4
2010,50.5
2010,56.3
2010,58.1
2010,41.8
2010,53
2010,58.9
2010,52.5
2010,56.4
2010,55.4
2010,39
2010,57.7
2010,59.8
2010,54.9
2010,56.1
2010,55.6
2010,57.5
2010,47.4
2010,59.5
2010,48.7
2010,59.4
2010,55.5
2010,45.1
2010,49
2010,43.1
2010,53.9
2010,44.2
2010,53.2
2010,48.8
2010,44.3
2010,57.3
2010,50.4
2010,58.5
2010,56.7
2010,51.3
2010,43
2010,58.4
2010,56.9
2010,57.2
2010,51.2
2010,50.9
2010,54.4
2010,59.3
2010,56
2010,58.2
2010,60.9
2010,59.1
2010,57.4
2010,51.9
2010,58
2010,57.1
2010,55
2010,60.7
2010,55.7
2010,50.3
2010,57.6
2010,60.5
2010,53.7
2010,56.5
2010,52.8
2010,46.7
2010,52.3
2010,52.7
2010,55.2
2010,62.4
2010,62.6
2010,62.5
2010,69.5
2010,63.5
2010,62.2
2010,62
2010,61.3
2010,54.8
2010,64.3
2010,61.4
2010,67.2
2010,63
2010,64.5
2010,55.8
2010,58.6
2010,60.6
2010,61
2010,60.2
2010,65.3
2010,59.6
2010,73.9
2010,63.3
2010,63.7
2010,63.2
2010,71.3
2010,64.8
2010,64.1
2010,69.1
2010,59.2
2010,67.8
2010,67.1
2010,64.7
2010,58.7
2010,61.7
2010,59.9
2010,65.2
2010,64.4
2010,62.7
2010,65.8
2010,65.1
2010,63.4
2010,61.8
2010,61.5
2010,62.8
2010,64.2
2010,63.1
2010,62.9
2010,63.9
2010,61.9
2010,65
2010,65.6
2010,69.8
2010,74.5
2010,64.6
2010,72.1
2010,66.4
2010,66.8
2010,63.8
2010,66.5
2010,65.4
2010,65.5
2010,66.3
2010,65.9
2010,67
2010,69.4
2010,66.9
2010,63.6
2010,70.1
2010,68.3
2010,67.9
2010,70.3
2010,66.6
2010,67.4
2010,70.7
2010,66.7
2010,68.1
2010,71.2
2010,67.6
2010,68.4
2010,72.2
2010,67.3
2010,68.6
2010,61.6
2010,65.7
2010,62.1
2010,61.2
2010,60.4

和此代码

library(latticeExtra)

heisenberg <- read.csv(file="ABSOLUTE_FILE_LOCATION")

x <- heisenberg[[1]]
y <- heisenberg[[2]]
z <- heisenberg[[3]]

cloud(z~x+y,heisenberg,panel.3d.cloud=panel.3dbars,col.facet='green',xbase=0.4,ybase=0.4,scales=list(arrows=FALSE,col=1),par.settings = list(axis.line = list(col = "transparent")))

创建此3D条形图