View source: R/Rfunction_include_argument_values.R
Rfunction_include_argument_values | R Documentation |
Utility functions for writing R functions.
## include argument values in a function input
Rfunction_include_argument_values(string, maxlen=70)
## assign objects to entries in a list
Rfunction_output_list_result_function(string, mid=" <- res$")
## delete declaration of Rcpp and RcppArmadillo object classes
Rcppfunction_remove_classes(string, maxlen=70, remove=TRUE)
string |
String |
maxlen |
Maximal string length for output |
mid |
Middle term in the output |
remove |
Logical indicating whether object classes should be removed |
String
#############################################################################
# EXAMPLE 1: Toy examples
#############################################################################
##**** extend missing arguments
string <- "
mice.impute.2l.pls2(y, ry, x, type, pls.facs=pls.facs ))
"
cat( miceadds::Rfunction_include_argument_values(string) )
## mice.impute.2l.pls2( y=y, ry=ry, x=x, type=type, pls.facs=pls.facs )
##**** assignment to objects as entries in a list
string <- "
list( vname=vname, p, type=type, data=data, levels_id )
"
cat( miceadds::Rfunction_output_list_result_function( string ) )
##
## vname <- res$vname
## p <- res$p
## type <- res$type
## data <- res$data
## levels_id <- res$levels_id
string <- "
arma::colvec miceadds_rcpp_rtnorm2( arma::colvec mu,
double sigma0, arma::colvec lower, arma::colvec upper,
double minval, double maxval)
"
cat( miceadds::Rcppfunction_remove_classes(string, maxlen=70) )
cat( miceadds::Rcppfunction_remove_classes(string, maxlen=70, remove=FALSE) )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.