Difference between revisions of "User:Teemu R"
From Testiwiki
m |
(→R code test) |
||
| (9 intermediate revisions by the same user not shown) | |||
| Line 3: | Line 3: | ||
THL | THL | ||
==R code test== | ==R code test== | ||
| − | + | <rcode graphics=1> | |
| − | <rcode | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | > | ||
library(OpasnetUtils) | library(OpasnetUtils) | ||
| − | + | library(ggplot2) | |
| + | test <- data.frame(a=1:4, b = letters[1:4]) | ||
oprint(test) | oprint(test) | ||
| + | ggplot(test, aes(x = b, y = a, fill= b)) + geom_bar(stat = "identity") | ||
| + | cat("asdasadadd\n") | ||
| + | test <- runif(1e7) | ||
| + | qplot(test) | ||
</rcode> | </rcode> | ||
| + | <rcode embed=1 name="embedded" label="embed run" graphics=1> | ||
| + | library(OpasnetUtils) | ||
| + | library(ggplot2) | ||
| + | test <- data.frame(a=1:4, b = letters[1:4]) | ||
| + | oprint(test) | ||
| + | ggplot(test, aes(x = b, y = a, fill= b)) + geom_bar(stat = "identity") | ||
| + | cat("asdasadadd\n") | ||
| + | flush.console() | ||
| + | </rcode> | ||
| + | aaaaa | ||
| + | |||
| + | == T2B test == | ||
| + | <t2b index="Year,Country" unit="#" obs="Mortality" desc="Description,Additional information"> | ||
| + | 2001|Finland|1000|data description| | ||
| + | 2002|Finland|100|| | ||
| + | 2001|Sweden|600||Some additional stuffs | ||
| + | 2002|Sweden|800|| | ||
| + | </t2b> | ||
Latest revision as of 13:39, 22 September 2017
Teemu Rintala
THL
R code test
T2B test
| Obs | Year | Country | Mortality | Description | Additional information |
|---|---|---|---|---|---|
| 1 | 2001 | Finland | 1000 | data description | |
| 2 | 2002 | Finland | 100 | ||
| 3 | 2001 | Sweden | 600 | Some additional stuffs | |
| 4 | 2002 | Sweden | 800 |
