SetDirectory["/Users/takasu/Desktop/H23 計算機実験1/rv/build/Debug/"]

data=ReadList["data_rv",Real];
Length[data]

ListPlot[data,Joined->True]

data=ReadList["data_rv",{Real,Real}];
Length[data]

ListPlot[data,AspectRatio->1]

ListPlot[data,AspectRatio->1,PlotRange->{{0.1,0.2},{0.1,0.2}}]

data=ReadList["data_rv",{Real,Real,Real}];

seqPoint=Map[Point,data];
Length[seqPoint]

g=Show[Graphics3D[seqPoint]]

Show[Graphics3D[seqPoint],PlotRange->{{0.1,0.3},{0.1,0.3},{0.1,0.3}}]