Description Usage Arguments Details Value Examples
Convert a Zeiss LMS file to an X3P format.
1 2 | lms2x3p.file(surf.info, extra.file.info.list, comment.list, fname,
move.to.directory)
|
surf.info |
surface information returned from read.zeiss.lms.file |
extra.file.info.list |
extra information required by ISO standards |
comment.list |
optional comments on how the data was obtained. |
fname |
name for the .x3p file to be written |
move.to.directory |
path where to move the file. |
Convert a Zeiss LMS file to an X3P format and writes the result to file. move.to.directory
is the path where to move the file. The file itself is initiall written to tempdir()
.
Nothing.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 | file.path <- system.file("extdata", "glock.lms", package="x3pr")
glock.lms.info <- read.zeiss.lms.file(file.path)
extra.header.info <- list(
x.axis.type = "I",
x.data.type = "F",
x.offset = 0.0,
y.axis.type = "I",
y.data.type = "F",
y.offset = 0.0,
z.axis.type = "A",
z.data.type = "F",
z.offset = 0.0,
who.wrote.file = "abe[-at-]potus.gov ",
manufacturer = "Leitz",
model = "Model-A",
sn = "8675309",
vers = "Version: 2010-C.E.",
cal.dte = "2013-08-15T08:00:00-03:00",
probe.type = "NonContacting",
probe.id = "Interferometer",
z.format = 1)
comment.block<-list(
paste("Surface is from: "," an object, ",sep=""),
paste("Surface category: ","It was the left chunk, ",sep=""),
paste("Surface sample#: ",3,", ",sep=""),
paste("Droupouts/Outliers filled with ..., ",sep=""),
paste("Estimated Resolution x (meters) ", glock.lms.info[[1]]$x.inc/1000, ", ",sep=""),
paste("Estimated Resolution y (meters) ", glock.lms.info[[1]]$y.inc/1000, ", ",sep=""),
paste("Estimated Resolution z (meters) ", glock.lms.info[[1]]$z.inc/1000, ", ",sep=""),
paste("Form removed?: ", "YesOrNo, ",sep=""),
paste("Filter ", "Type: None/", "Cutoffs: None, ",sep=""),
paste("Microscope Objective: ", "50x/","0.8NA, ",sep=""),
paste("Invalid Pixel Value: ", NaN,sep=""))
lms2x3p.file(glock.sur.info, extra.header.info, comment.block, fname="testfile.x3p", move.to.directory=getwd())
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.