OpasnetUtils/Summary: Difference between revisions

From Opasnet
Jump to navigation Jump to search
(→‎Code: Vain yksi iteraatio)
Line 22: Line 22:
rescol <- ifelse(test, paste(object@name, "Result", sep = ""), "Result")
rescol <- ifelse(test, paste(object@name, "Result", sep = ""), "Result")
object@output <- object@output[ , -grep("Description|Source", colnames(object@output))]
object@output <- object@output[ , -grep("Description|Source", colnames(object@output))]
print(xtable(head(object@output)), type = 'html')
if("Iter" %in% colnames(object@output)) {
object@output <- object@output[object@output$Iter == 1, ]
}
if(nrow(object@output) > 200) {
object@output <- object@output[1:200, ]
}
print(xtable(object@output), type = 'html', html.table.attributes = "class='sortable'")
# Kehityskohteita:
# Kehityskohteita:
## Näytetään vain yksi iteraatio, jos Iter-sarake on olemassa.
## Lasketaan mean, median, min, max, 95%CI, SD resultista selittävien sarakkeiden suhteen.
## Lasketaan mean, median, min, max, 95%CI, SD resultista selittävien sarakkeiden suhteen.
}
}
)
)
</rcode>
</rcode>



Revision as of 14:08, 1 January 2013



Description

Summary defines how summaries of ovariables are shown.

Code

Code name: summary

+ Show code

See also