Ero sivun ”Puijon Pakertajat” versioiden välillä
Siirry navigaatioon
Siirry hakuun
pEi muokkausyhteenvetoa |
pEi muokkausyhteenvetoa |
||
| Rivi 12: | Rivi 12: | ||
"> | "> | ||
library(OpasnetBaseUtils) | library(OpasnetBaseUtils) | ||
Obs <- | Obs <- max(op_baseGetData("opasnet_base", "Op_fi2699")[,"obs"])+1 | ||
data <- data.frame( | data <- data.frame( | ||
obs = rep(Obs, 5), | obs = rep(Obs, 5), | ||
| Rivi 18: | Rivi 18: | ||
Result = c(nimi, tilaisuus, ilmoitus, huoltaja, lisätietoja)) | Result = c(nimi, tilaisuus, ilmoitus, huoltaja, lisätietoja)) | ||
data | data | ||
opbase.upload(dsn = "opasnet_base_write", input = data, ident = "Op_fi2699", acttype = | opbase.upload(dsn = "opasnet_base_write", input = data, ident = "Op_fi2699", acttype = 5, who = wiki_username, unit = "-") | ||
cat("Kiitos ilmoituksestasi!") | cat("Kiitos ilmoituksestasi!") | ||
</rcode> | </rcode> | ||
==Ilmoittautuneet== | |||
<rcode variables=" | |||
name:tilaisuus|description:Tilaisuus|type:selection|options:'ROK-kurssi 7-9.10.';ROK-kurssi 7-9.10.;'Haiden syysretki 15-16.10.';Haiden syysretki 15-16.10.|default:'Valitse';Valitse | |||
"> | |||
library(OpasnetBaseUtils) | |||
library(xtable) | |||
data <- op_baseGetData("opasnet_base", "Op_fi2699")[, -c(1,4)] | |||
data <- reshape(data, timevar = "Parameter", idvar = "obs", direction = "wide") | |||
colnames(data) <- c("obs", "Huoltaja", "Ilmoitus", "Lisätietoja", "Nimi", "Tilaisuus") | |||
data <- data[data$Tilaisuus == tilaisuus, -4] | |||
print(xtable(data), type='html') | |||
</rcode> | |||
==Katso myös== | ==Katso myös== | ||
* [[Järvi-Suomen Partiolaiset ry]] | * [[Järvi-Suomen Partiolaiset ry]] | ||
* [http://puijonpakertajat.partio.net/ Puijon Pakertajien kotisivu] | * [http://puijonpakertajat.partio.net/ Puijon Pakertajien kotisivu] | ||
Versio 2. lokakuuta 2011 kello 15.52
| Moderaattori:Jouni (katso kaikki)
Sivun edistymistä ei ole arvioitu. Arvostuksen määrää ei ole arvioitu (ks. peer review). |
| Lisää dataa
|
Puijon Pakertajat ry on Kuopiossa toimiva partiolippukunta.