הצגת נתון חריג בגרף 3D

[ronen]

שלום רב

יש לי נתונים על 3 משתנים

אני מאתר תצפיות חריגות לפי מרחקי מהלנוביס

 

הייתי רוצה להציג את החריגים בגרף  תלת ממדי

אני רוצה גרף לא אינטראקטיבי כי אני מעתיק אותו בצורה אוטומטית ושם במקום אחר

 

הבעיה שקשה לזהות את החריגות בתלת מימד

זה קל כשעושים 3 גרפים דו-ממדיים

אשמח להצעות כיצד להדגיש את החריגות בתלת מימד

 

אני מצרף תכנית לדוגמא בה אני עושה 4 גרפים על ידי סיבוב

הייתי שמח כיצד לבחור זוית  מראש שתראה את החריגות הכי טוב

או כל שיטה אחרת

 

תודה רבה

רונן

 

library(scatterplot3d)

set.seed(5)

n=           250

d=           matrix(rnorm(n*3),ncol=3)

d[,3]=    -0.5*d[,2]+0.5*rnorm(n)

d=           scale(d)

nm=       c("x","y","z")

colnames(d)=nm

invcovd=solve(cov(d))

d[n,]=   rep(1.5,3)

disty=    apply(d,1,function(x){x%*%invcovd%*%x})                

coly=     rep(3,n)

pchy=    rep(21,n)

sizey=   rep(1,n)

coly[n]=2

pchy[n]=19

sizey[n]=2

plot(disty,col=coly,pch=19,lwd=sizey)  # 3D plot

X11()

par(mfrow=c(2,2))

for(ang in c(30,120,210,300))

{

s3d=      scatterplot3d(d[,1],d[,2],d[,3],main="Data",xlab=nm[1],ylab=nm[2],zlab=nm [3],angle=ang,color=coly,pch=pchy,highlight.3d=F)

}