怎么用mathematica 绘制 三维 散点图

怎么用mathematica 绘制 三维 散点图
颜色根据权重来显示深浅.
数据已从excel中导入.格式为{74.,781.,5.,
7.84},{1373.,731.,11.,5.93},{1321.,1791.,28.,4.9},{0.,
1787.,4.,6.56},{1049.,2127.,12.,6.35},{1647.,2728.,6.,
14.08},{2883.,3617.,15.,8.94},{2383.,3692.,7.,
9.62},{2708.,2295.,22.,7.41},{2933.,1767.,7.,8.72},{4233.,
895.,6.,5.93},{4043.,1895.,14.,9.17},{2427.,3971.,2.,
5.72},{3526.,4357.,7.,4.49}……
前三个为坐标,后一个为权重
倩昵 1年前 已收到1个回答 举报

yyymmn 幼苗

共回答了12个问题采纳率:91.7% 举报

Graphics3D, Point, Hue相结合, 毫无压力.

1年前 追问

9

倩昵 举报

大神,求指导~~ 前三维是表示坐标的,最后一维表示颜色的深浅~~~ 我已近快死了,求大神捞我一把……

举报 yyymmn

问问你的背景, 你是新手还是老手? 如果你是新手我直接贴代码, 才两三行而已. 如果是老手, 根据这几个函数应该可以直接出结果的啦.

倩昵 举报

新手,求代码,数据有上千个,几乎组成连续画面,球体大小可能需要改,能QQ指导吗?如果不行的话,求这段代码吧

举报 yyymmn

{point,weight}={Transpose[#][[1;;3,All]]//Transpose,Transpose[#]//Last}&[{{74.,781.,5.,7.84},{1373.,731.,11.,5.93},{1321.,1791.,28.,4.9},{0.,1787.,4.,6.56},{1049.,2127.,12.,6.35},{1647.,2728.,6.,14.08},{2883.,3617.,15.,8.94},{2383.,3692.,7.,9.62},{2708.,2295.,22.,7.41},{2933.,1767.,7.,8.72},{4233.,895.,6.,5.93},{4043.,1895.,14.,9.17},{2427.,3971.,2.,5.72},{3526.,4357.,7.,4.49}}] weightNorm=(#-Min[#])/(Max[#]-Min[#])&[weight] Graphics3D[{PointSize[0.05],{RGBColor[#,0,0]&/@weightNorm,Point/@point}//Transpose},AspectRatio->1,BoxRatios->1,Axes->True]
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 18 q. 0.031 s. - webmaster@yulucn.com