Wolfram mathematica 数据点减法

我有一个数据点表，可以被另一个数据点表减去。我成功地减去了每个数据点的y值，但每个数据点的x值是我遇到的问题

m = 10;
DataList = Table[{}, {i, 1, m}];
BGData = Import["BatchData-Background.txt", "Table"];
BGPlot = ListPlot[BGData, FrameLabel -> {"Time (s)", "Voltage [V]"}, PlotStyle -> Black] 

Do[{DataList[[i]] = Import["BatchData-B" <> ToString[i] <> "V.txt", "Table"];
DataPlot = ListPlot[DataList[[i]], FrameLabel -> {"Time (s)", "Voltage (V)"}, PlotStyle -> Gray]; Print["B = ", i, "Volts"]; Print[DataPlot];}, {i, 1, m}];

m = 10;
SubDataList = Table[{DataList[[i, All, 2]] - BGData[[All, 2]]}, {i, 1, m}]; 

Do[{SubDataPlot = ListPlot[SubDataList[[i]]];}, {i, 1, m}] `

m = 10;
SubDataList = Table[{DataList[[i,All,2]]-BGData[[All,2]]},{i,1,m}];
Do[{SubDataPlot=ListPlot[SubDataList[[i]]];},{i,1,m}]

m=10；
数据表=表[{}，{i，1，m}]；
BGData=Import[“BatchData Background.txt”，“Table”]；
BGPlot=ListPlot[BGData，FrameLabel->{“时间”，“电压[V]”，PlotStyle->黑色]
Do[{DataList[[i]]=Import[“BatchData-B”to字符串[i]“V.txt”，“Table”]；
DataPlot=ListPlot[DataList[[i]]，FrameLabel->{“Time（s）”，“Voltage（V）”}，PlotStyle->Gray]；Print[“B=”，i，“Volts”]；Print[DataPlot]；}，{i，1，m}]；
m=10；
SubDataList=表[{DataList[[i，All，2]]-BGData[[All，2]]}，{i，1，m}]；
Do[{SubDataPlot=ListPlot[SubDataList[[i]]]；}，{i，1，m}]`
m=10；
SubDataList=表[{DataList[[i，All，2]]-BGData[[All，2]]}，{i，1，m}]；
Do[{SubDataPlot=ListPlot[SubDataList[[i]]]；}，{i，1，m}]

这是我遇到麻烦的代码。但是，我的绘图将获得正确的y值，但我的x轴将自动设置为

0

到

1400

，步骤为

200

。但是，我的数据点显示，我的x轴应该是从

0

到

0.07

，步数为

0.01

---

DataList

和

BGData

都是它自己的表，我为每个表所做的规范只是提取每个表中的

y值并减去它们。
请阅读更多的
ListPlot
文档。表情

ListPlot[SubDataList]

如您所观察到的，绘制
子数据列表中的值，从
1
到
m
。如果向函数提供第二个值列表，可能

ListPlot[{SubDataList, BGData}]

将第一个列表视为x坐标列表，将第二个列表视为y坐标列表
 为
子数据列表制作一些从0到1400的示例数据点，并在0到0.07的x刻度上绘制它们：-

subDataList = Table[Sin[x], {x, 0, 4 Pi, 4 Pi/1400}];

ListPlot[Transpose[{Prepend[Range[1400]*0.00005, 0], subDataList}]]