TidyCode {bfw} | R Documentation |
Small function that clears up messy code
TidyCode(tidy.code, jags = TRUE)
tidy.code |
Messy code that needs cleaning |
jags |
logical, if TRUE run code as JAGS model, Default: TRUE |
(Somewhat) tidy code
messy <- "code <- function( x ) {
print (x ) }"
cat(messy)
code <- function( x ) {
print (x ) }
cat ( TidyCode(messy, jags = FALSE) )
code <- function(x) {
print(x)
}