Displaying 1 result from an estimated 1 matches for "bfile_points".
2010 Jul 05
1
export VTK from R : impossible to write data as float
...;vtk_header", append=TRUE)
#placed here instead of top of vtk_points, since npoints is not known before
cat('POINTS', 8,'int\n',file="vtk_header",append=TRUE)
#write points
writeBin(as.integer(c(0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 1, 0, 1,
0, 1, 1, 1, 1, 1)),bfile_points,endian="swap")
#cells header
cat('\nCELLS', 1,9,'\n',file="cells_header")
#write cells
writeBin(as.integer(c(8, 0, 1, 3, 2, 4, 5, 7, 6)),bfile_cells,endian="swap")
#cell types header
cat('\nCELL_TYPES', 1,'\n',file="celltypes_head...