求助：怎么在多维度的图中画出线段

marsyxp

segments似乎只可以在二维的图中画出线段。

比如在5维度的图中有如下两个点

att1 att2 att3 att4 att5

point1 2 3 4 5 7

point2 8 10 8 3 1

怎么可以画出连接这两个点的线段呢？

并且可以指定在哪两个维度上显示出来

请帮帮忙，感激不尽！

bjt

这不是 R 的问题，是你考虑如何将多维数据展示的问题。

marsyxp

多维数据可以很容易在R中展示出。

不过segments函数却只是针对二维平面的点才可以画出线段的。

bjt

估计你是想这样吧：

MASS:parcoord

这年代回答问题都得猜

marsyxp

我的意思是

比如说对于如下两个点

att1 att2 att3 att4 att5

point1 2 3 4 5 7

point2 8 10 8 3 1

假设将它们存入list1中

plot（list1）

可以得到一组图，这两个点的位置在任意两个维度的小图上都可以看到

但是怎么才可以在这一组图中显示出这两点的连线呢？

yihui

因为只有两个点，所以在任何图上都是一条线段（不管几维），你看不到任何信息

五维的数据我不知道在平面上怎样用笛卡尔坐标系表示，我无法想象四维空间的形状……高维数据你可以试试平行坐标系

library(lattice)

?parallel

marsyxp

可能是我没有把问题叙述清楚吧，对不起。

是这样的。

首先创建如下形式的一个list，命名为list1

att1 att2 att3 att4 att5

1 -5 6 3 -3 5

2 -3 6 2 -4 1

3 -4 5 2 -3 3

4 -6 6 1 -5 2

5 -4 3 1 -5 3

6 -9 1 1 -7 1

7 -8 1 0 -7 1

8 -9 0 5 -4 5

9 -9 5 1 -2 5

总共有9个点，每个点都是5个维度。

plot（list1）可以得到一个图像，其中包含20个小图。

比如对于1，2两点，我想知道用什么命令可以连接这两点。

并且在相应的20个小图中可以显示出这条线段。

（20个小图其实是1至5个维度两两组合而成的。）

您可以运行一下plot（list1）这条命令试一下，就会一目了然了。

但是我不清楚怎么在这些小图中画出一条线段。

lixiaoxu

plot(ds<-data.frame(matrix(rnorm(100*5,0,1),nrow=100)),

col=ifelse(ds[,1]>0,'red','grey'),

pch=ifelse(ds[,1]>0,'.','o'));

我懒得写插值的例子了。你需要写个插值的函数，然后用pch='.' 来画其中的线条

yihui

plot一个data.frame默认就是pairs()，自己修改panel参数即可

dat=read.table(con<-textConnection('att1 att2 att3 att4 att5<br />
1   -5   6   3   -3   5<br />
2   -3   6   2   -4   1<br />
3   -4   5   2   -3   3<br />
4   -6   6   1   -5   2<br />
5   -4   3   1   -5   3<br />
6   -9   1   1   -7   1<br />
7   -8   1   0   -7   1<br />
8   -9   0   5   -4   5<br />
9   -9   5   1   -2   5'),TRUE,row.names=1)<br />
close(con)<br />
pairs(dat,panel=function(x,y)points(x,y,type='l'))

marsyxp

谢谢大家的热情帮助，明白了^_^