level 4
ElevenYJF
楼主
为了导入数据做图,数据非常多,但不知是什么问题,导入的数据直接作图做不了,只得用笨办法:
把数据一个个导入
Import["E:\\plot3D\\0GPa.txt", "Table"]
然后运行得到的数据再复制到Plot指令中
ListPlot3D[{{10.058`, 0, 619.12624`}, {10.121`, 0, 512.23248`}...数据...},PlotRange -> All, ColorFunction -> "Rainbow", PlotLegends -> Automatic, Mesh -> None]
这样是可以做出图的,虽然很麻烦而且运行了很久,但是应该是可以导入的数据直接读取的,不用复制粘贴,
我做了一个简单的例子:
ClearAll["Global`*"]
data1 = Import["E:\\code\\plot3D\\example1.txt", "Table"]
data2 = Import["E:\\code\\plot3D\\example2.txt", "Table"]
Flatten[data = {data1, data2}, 1]
ListPlot[data]
出来的图是一个空的坐标轴。
但是这样就做得了图了,直接输入数据:
ClearAll["Global`*"]
data3 = {{3, 3}, {4, 4}}
data4 = {{5, 5}, {6, 6}}
Flatten[data = {data3, data4}, 1]
ListPlot[data]

2018年04月08日 06点04分
1
把数据一个个导入
Import["E:\\plot3D\\0GPa.txt", "Table"]
然后运行得到的数据再复制到Plot指令中
ListPlot3D[{{10.058`, 0, 619.12624`}, {10.121`, 0, 512.23248`}...数据...},PlotRange -> All, ColorFunction -> "Rainbow", PlotLegends -> Automatic, Mesh -> None]
这样是可以做出图的,虽然很麻烦而且运行了很久,但是应该是可以导入的数据直接读取的,不用复制粘贴,
我做了一个简单的例子:
ClearAll["Global`*"]
data1 = Import["E:\\code\\plot3D\\example1.txt", "Table"]
data2 = Import["E:\\code\\plot3D\\example2.txt", "Table"]
Flatten[data = {data1, data2}, 1]
ListPlot[data]
出来的图是一个空的坐标轴。
但是这样就做得了图了,直接输入数据:
ClearAll["Global`*"]
data3 = {{3, 3}, {4, 4}}
data4 = {{5, 5}, {6, 6}}
Flatten[data = {data3, data4}, 1]
ListPlot[data]
