[R-br] problemas no uso da função Wireframe

[Fernando Antonio de souza]

Caros colegas, estou com dificuldades em utilizar a funçao wireframe para
contruir um gráfico 3D. A função fica me retornando que não é
permitido utilizar vetores de comprimento negativo. Entretanto não há (nem
existe) vetores de comprimento negativo. Caso tenha experiência no uso
desta função agradeço desde ja a ajuda

GPD<-rep(100,66)
FDN<-rep(15:80,each=1,1)

dput(GRAF)

CMSPM<- structure(c(41.4342238231054, 43.9158002951626, 46.3314684686358,

48.6812283435249, 50.9650799198301, 53.1830231975512, 55.3350581766883,

57.4211848572414, 59.4414032392104, 61.3957133225955, 63.2841151073965,

65.1066085936135, 66.8631937812465, 68.5538706702954, 70.1786392607604,

71.7374995526413, 73.2304515459382, 74.6574952406511, 76.01863063678,

77.3138577343248, 78.5431765332856, 79.7065870336625, 80.8040892354552,

81.835683138664, 82.8013687432888, 83.7011460493295, 84.5350150567862,

85.3029757656589, 86.0050281759476, 86.6411722876522, 87.2114081007729,

87.7157356153095, 88.1541548312621, 88.5266657486306, 88.8332683674152,

89.0739626876157, 89.2487487092323, 89.3576264322648, 89.4005958567133,

89.3776569825777, 89.2888098098582, 89.1340543385546, 88.913390568667,

88.6268185001954, 88.2743381331398, 87.8559494675001, 87.3716525032764,

86.8214472404687, 86.205333679077, 85.5233118191013, 84.7753816605415,

83.9615432033978, 83.08179644767, 82.1361413933581, 81.1245780404623,

80.0471063889825, 78.9037264389186, 77.6944381902707, 76.4192416430388,

75.0781367972229, 73.671123652823, 72.198202209839, 70.659372468271,
69.054634428119, 67.383988089383, 65.647433452063), label = "Predicted
values")

data<-data.frame(CMSPM=CMSPM,GPD=GPD,FDN=FDN)
wireframe(CMSPM~FDN*GPD,data=data)

 structure(c(41

structure(c(41.4342238231054, 43.9158002951626, 46.3314684686358,
48.6812283435249, 50.9650799198301, 53.1830231975512, 55.3350581766883,
57.4211848572414, 59.4414032392104, 61.3957133225955, 63.2841151073965,
65.1066085936135, 66.8631937812465, 68.5538706702954, 70.1786392607604,
71.7374995526413, 73.2304515459382, 74.6574952406511, 76.01863063678,
77.3138577343248, 78.5431765332856, 79.7065870336625, 80.8040892354552,
81.835683138664, 82.8013687432888, 83.7011460493295, 84.5350150567862,
85.3029757656589, 86.0050281759476, 86.6411722876522, 87.2114081007729,
87.7157356153095, 88.1541548312621, 88.5266657486306, 88.8332683674152,
89.0739626876157, 89.2487487092323, 89.3576264322648, 89.4005958567133,
89.3776569825777, 89.2888098098582, 89.1340543385546, 88.913390568667,
88.6268185001954, 88.2743381331398, 87.8559494675001, 87.3716525032764,
86.8214472404687, 86.205333679077, 85.5233118191013, 84.7753816605415,
83.9615432033978, 83.08179644767, 82.1361413933581, 81.1245780404623,
80.0471063889825, 78.9037264389186, 77.6944381902707, 76.4192416430388,
75.0781367972229, 73.671123652823, 72.198202209839, 70.659372468271,
69.054634428119, 67.383988089383, 65.647433452063), label = "Predicted values")

.4342238231054, 43.9158002951626, 46.3314684686358, 48.6812283435249,
50.9650799198301, 53.1830231975512, 55.3350581766883, 57.4211848572414,
59.4414032392104, 61.3957133225955, 63.2841151073965, 65.1066085936135,
66.8631937812465, 68.5538706702954, 70.1786392607604, 71.7374995526413,
73.2304515459382, 74.6574952406511, 76.01863063678, 77.3138577343248,
78.5431765332856, 79.7065870336625, 80.8040892354552, 81.835683138664,
82.8013687432888, 83.7011460493295, 84.5350150567862, 85.3029757656589,
86.0050281759476, 86.6411722876522, 87.2114081007729, 87.7157356153095,
88.1541548312621, 88.5266657486306, 88.8332683674152, 89.0739626876157,
89.2487487092323, 89.3576264322648, 89.4005958567133, 89.3776569825777,
89.2888098098582, 89.1340543385546, 88.913390568667, 88.6268185001954,
88.2743381331398, 87.8559494675001, 87.3716525032764, 86.8214472404687,
86.205333679077, 85.5233118191013, 84.7753816605415, 83.9615432033978,
83.08179644767, 82.1361413933581, 81.1245780404623, 80.0471063889825,
78.9037264389186, 77.6944381902707, 76.4192416430388, 75.0781367972229,
73.671123652823, 72.198202209839, 70.659372468271, 69.054634428119,
67.383988089383, 65.647433452063), label = "Predicted values")
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120608/1e03be1c/attachment.html>