Difference between revisions of "OpasnetUtils/Plot"

From Opasnet
Jump to: navigation, search
m
m
 
(2 intermediate revisions by 2 users not shown)
Line 8: Line 8:
  
 
==Code==
 
==Code==
<rcode
 
name="setmethod.plot"
 
label="Initiate functions"
 
graphics="1"
 
>
 
# SETMETHOD PLOT ################ plot diagrams about ovariable data
 
  
temp <- setMethod(
+
https://www.opasnet.org/svn/opasnet_utils/trunk/R/Plot.r
f = "plot",
 
signature = signature(x = "ovariable"),
 
definition = function(x) {
 
plot(
 
x    = x@output[, paste("Source", x@name, sep = ".")],
 
y    = x@output$Result,
 
xlab = paste("Source", x@name, sep = "."),
 
ylab = x@output[x@output[, paste("Source", x@name, sep = ".")] == "Data", "Unit"][1],
 
main = x@name
 
)
 
}
 
)
 
 
 
temp <- setMethod(
 
f = "plot",
 
signature = signature(x = "oassessment"),
 
definition = function(x) {
 
for(i in names(x@vars)) {
 
plot(x@vars[[i]])
 
}
 
}
 
)
 
</rcode>
 
  
 
==See also==
 
==See also==

Latest revision as of 13:58, 16 August 2012



Description

Plot diagrams about ovariable data

Code

https://www.opasnet.org/svn/opasnet_utils/trunk/R/Plot.r

See also