Displaying 1 result from an estimated 1 matches for "vparams".
Did you mean:
params
2010 Feb 01
0
Building a plotmath string in a function
...'s my latest attempt:
BuildParString = function(params) {
nPar = length(params) # params is a vector of numerical values
s = NULL
if(nPar < 1) {
return
}
pNames = c("R","P[m]","k[a]","alpha[r]","beta[r]","phi")
vparams = format(params,digits=3)
s = as.expression(substitute(pp==vv,list(vv=vparams[1],pp=pNames[1])))
for(i in 2:nPar) {
s =
c(s,eval(as.expression(substitute(expression(pp==vv),list(vv=vparams[i],pp=pNames[i])))))
}
as.expression(s)
}
# the result is
expression("R" == "13.3...