User:Teemu R: Difference between revisions

From Opasnet
Jump to navigation Jump to search
No edit summary
 
(9 intermediate revisions by the same user not shown)
Line 3: Line 3:
THL
THL
==R code test==
==R code test==
{{resultlink}}
<rcode graphics=1>
<rcode
name="api"
showcode="1"
live="1"
variables="
name:test|type:text|default:test|
name:ident|type:hidden|default:'{{{1|Op_en{{PAGEID}}}}}'|
name:pagename|type:hidden|default:'{{PAGENAME}}'
"
>
library(OpasnetUtils)
library(OpasnetUtils)
opbase.upload(data.frame(Uploader = wiki_username, Result = test), who = "Teemu R", name = pagename, ident = ident, subset = "APItest", act_type = "append")
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)
objects.store(test)
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")
</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>
== Test edit ==
https://github.com
https://www.facebook.com

Latest revision as of 08:30, 1 December 2017

Teemu Rintala

THL

R code test

+ Show code

+ Show code

aaaaa

T2B test

User:Teemu R: Difference between revisions(#)
ObsYearCountryMortalityDescriptionAdditional information
12001Finland1000data description
22002Finland100
32001Sweden600Some additional stuffs
42002Sweden800

Test edit

https://github.com https://www.facebook.com