level 1
闲淡泡饭
楼主
就是我有一个近似球的全部坐标,然后画散点图可以全部显示,但是画三维图就会少
代码:data = Import["D:\\Data\\c01.txt", "Data"]
p1 = ListSurfacePlot3D[data, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
p2 = ListPlot3D[data, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
p3 = ListPointPlot3D[data, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
data1 = Import["D:\\Data\\c02.txt", "Data"]
p4 = ListSurfacePlot3D[data1, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
p5 = ListPlot3D[data1, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
p6 = ListPointPlot3D[data1, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
Show[p1, p4]
Show[p2, p5]
Show[p3, p6]

2020年10月17日 10点10分
1
代码:data = Import["D:\\Data\\c01.txt", "Data"]
p1 = ListSurfacePlot3D[data, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
p2 = ListPlot3D[data, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
p3 = ListPointPlot3D[data, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
data1 = Import["D:\\Data\\c02.txt", "Data"]
p4 = ListSurfacePlot3D[data1, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
p5 = ListPlot3D[data1, AxesLabel -> {x轴, y轴, z轴}, PlotRange -> All]
p6 = ListPointPlot3D[data1, AxesLabel -> {x轴, y轴, z轴},
PlotRange -> All]
Show[p1, p4]
Show[p2, p5]
Show[p3, p6]
