test.list <- list(adoub=as.double(rnorm(20)), anint=as.integer(92:109),
achar=c("aaa", "bbbb", "ccccc"))
Cfrag.list(test.list, file="")
## Not run:
# Cfrag.list(test.list, file="test.c")
#
# Cfrag.list(test.list[1], file="test.c", dec=TRUE)
# Cfrag.list(test.list[-1], file="test.c", dec=FALSE, append=TRUE)
# ## End(Not run)
Run the code above in your browser using DataLab