求助如何画三维曲面图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

已知数据如下：

1. x        y        z
   
2. 5.905908399        4.738498054        25.25502181
   
3. 4.223049144        4.430298657        22.49592992
   
4. 4.877025335        2.84881187        17.14709994
   
5. 4.673027813        2.132675316        17.02137177
   
6. 6.093998982        3.11476212        22.30714155
   
7. 6.170870436        4.461290881        25.20142014
   
8. 5.897580588        2.716293385        20.73608842
   
9. 5.759534138        4.487924672        24.65305505
   
10. 4.686975282        4.977402439        23.26218291
    
11. 3.266212162        4.132378303        19.45099887
    
12. 4.832392192        3.335017721        19.17558751
    
13. 7.780744229        1.783248938        18.44171807
    
14. 3.162822243        3.952227871        16.76412287
    
15. 5.575274049        2.820919441        20.03316295
    
16. 5.806160896        4.464969892        24.62601983
    
17. 6.25410342        4.291461231        26.53886425
    
18. 5.67858899        1.955892714        20.42612567
    
19. 5.320889368        1.45072739        14.76363675
    
20. 5.724188255        4.67161591        25.23811447
    
21. 6.1053447        1.215967954        16.0803569
    
22. 4.124798765        2.892767981        17.51780578
    
23. 3.48157467        3.797512473        19.96545991
    
24. 6.302927929        2.119182261        18.08022825
    
25. 4.954218107        3.794380572        21.07861965
    
26. 4.174863605        4.571927255        22.51328694
    
27. 4.46268468        3.57384907        19.61201449
    
28. 5.030633534        1.336822243        16.25941791
    
29. 2.576839873        3.744518935        16.20324678
    
30. 4.6747323        1.644961845        14.30364299
    
31. 4.450439455        3.888811233        20.4723063

复制代码

想画如下图

该怎么画呢，谢谢啦

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：曲面图 已知数 如何

帮顶[tongue]

用Cairo包可以做
CairoPNG(file="Cairo2.png",width=640,height=480)
op <- par(bg = "white", mar=c(0,2,3,0)+.1)
persp(x, y, z,
theta = 30, phi = 30,
expand = 0.5,
col = "lightblue",
ltheta = 120,
shade = 0.75,
ticktype = "detailed",
xlab = "X", ylab = "Y", zlab = "Sinc(r)",
main = "Cairo"
)
par(op)
dev.off()
  
因为我不知道你的这个角度参数，改一下上面的程序，可以试一试

这个数据还是不错的，画出来很漂亮！Sigmaplot中3Dmesh轻松搞定！

DM小菜鸟 发表于 2015-2-15 11:39
用Cairo包可以做
CairoPNG(file="Cairo2.png",width=640,height=480)
op

麻烦问一下。persp函数画三维图怎么设置刻度线朝内