R:使用rgl.plot3d定位标签和轴

时间:2012-03-11 19:39:31

标签: r

我正在尝试使用rgl.plot3d创建一个三维散点图。但是,标签和轴的默认定位并不令人满意。例如,y轴标签位于远侧,而我希望它位于近侧。 x轴刻度位于远端。我把它们放在了近底部。我看了?par3d,但找不到任何可以帮助我的东西。是否可以在rgl中执行此操作?代码和数据如下。谢谢。

代码

d <- read.table(file='myfile.dat', header=F)
plot3d(
    d,
    xlim=c(0,20),
    ylim=c(0,20),
    zlim=c(0,10000),
    box=F,
    type='p',
    size=5,
    col=d[,1]
)
mtext3d(text='Test', edge='y+-', line=2)
axes3d(
    edges=c('x--', 'y+-', 'z--'),
    labels=T
)
lines3d(
    d,
    lwd=2,
    col=d[,1]
)
grid3d(side=c('x', 'y+', 'z'))

数据

11    2    2
NA    NA    NA
10    2    2
NA    NA    NA
13    2    1
NA    NA    NA
15    2    1
NA    NA    NA
5    2    11
5    3    10
5    4    16
5    5    34
5    6    102
5    7    294
5    8    682
5    9    1439
5    10    2646
5    11    3615
5    12    2844
5    13    1394
NA    NA    NA
4    2    10
4    3    4
4    4    4
4    5    10
4    6    38
4    7    132
4    8    396
4    9    976
4    10    2121
4    11    4085
4    12    6261
4    13    6459
4    14    4238
4    15    1394
NA    NA    NA
7    2    3
NA    NA    NA
6    2    2
NA    NA    NA
9    2    8
9    3    6
9    4    4
9    5    5
NA    NA    NA
8    2    4
8    3    10
8    4    22
8    5    52
8    6    126
8    7    264
8    8    478
8    9    729
8    10    943
8    11    754
8    12    382
NA    NA    NA

1 个答案:

答案 0 :(得分:3)

您需要查看?axis3d,其中描述了使用'edges'参数。如果您希望前后底部的x轴刻度标签和近端+底部的y轴,您将首先使用..., axes=FALSE,构建绘图并且焦点保持不变,在控制台发出此命令:

axes3d( edges=c("x--", "y--", "z") )

我还没想到是否可以删除rgl图中的现有轴。