# cteate a GDS file
f <- createfn.gds("test.gds")
node <- add.gdsn(f, "int", val=1:10000)
put.attr.gdsn(node, "missing.value", 10000)
sync.gds(f)
f
get.attr.gdsn(node)
# close the GDS file
closefn.gds(f)
# delete the temporary file
unlink("test.gds", force=TRUE)
Run the code above in your browser using DataLab