OpasnetUtils/Plot: Difference between revisions

Latest revision as of 13:58, 16 August 2012

This page is a knowledge crystal of subtype method. The page identifier is Op_en5737
Moderator:Nobody (see all) Click here to sign up.
This page is a stub. You may improve it into a full page.
Upload data {{#opasnet_base_link:Op_en5737}}

Plot diagrams about ovariable data

@@ Line 8: / Line 8: @@
 ==Code==
-<rcode
-	name="setmethod.plot"
-	label="Initiate functions"
-	graphics="1"
-	showcode="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==