Ero sivun ”Kommenttihaku” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
pEi muokkausyhteenvetoa
(→‎Vastaus: nyt toimii)
 
(Yhtä välissä olevaa versiota samalta käyttäjältä ei näytetä)
Rivi 8: Rivi 8:


<rcode embed=1 variables="
<rcode embed=1 variables="
name:tunniste|description:Anna haettavan kommentin tunnistelinkki|type:text
name:tunniste|description:Anna haettavan kommentin tunnistelinkki. Jos tyhjä, näytetään kaikki.|type:text|
name:piilota|description:Piilotetaanko poistetut kommentit?|type:selection|
options:TRUE;Kyllä;FALSE;Ei|default:TRUE
">
">


Rivi 16: Rivi 18:


dat <- data.frame()
dat <- data.frame()
poistot <- data.frame()


for(i in 1:nrow(sivut)) {
for(i in 1:nrow(sivut)) {
dat <- rbind(
dat <- rbind(
dat,  
dat,  
data.frame(Sivu = sivut$Nimi[i], opbase.data(sivut$Tunniste[i], subset = "Kommentit"))
data.frame(
Sivu = sivut$Nimi[i],  
opbase.data(sivut$Tunniste[i], subset = "Kommentit")
)
)
)
poistot <- rbind(
poistot,
data.frame(
Sivu = sivut$Nimi[i],
opbase.data(sivut$Tunniste[i], subset = "Kommenttipoistot")
)
)
}
if(piilota) {
dat <- dat[!paste(dat$Sivu, dat$Obs) %in% paste(poistot$Sivu, poistot$Kommenttinro) , ]
}
}



Nykyinen versio 31. toukokuuta 2014 kello 17.43




Kysymys

Miten selataan kommentteja?

Vastaus

Anna haettavan kommentin tunnistelinkki. Jos tyhjä, näytetään kaikki.:

Piilotetaanko poistetut kommentit?:

+ Näytä koodi

Perustelut

Data

Sivut, joissa käytetään kommentointityökalua(-)
ObsNimiTunnisteDummy
1Arktinen strategiaOp_fi4265
2Datan liiketoiminta- ja käyttömahdollisuudetOp_fi4260
3H2020 V1Op_fi4230
4KommentointityökaluOp_fi4224
5Käyttäjän oikeus omaan tietoonsa ja sen hyödyntämiseenOp_fi4258
6Liikenne- ja viestintäyhteydetOp_fi4264
7Liikennejärjestelmän rahoitus ja taloudellinen ohjausOp_fi4266
8Liikenteen energiareformiOp_fi4254
9Liikenteen palvelumarkkinatOp_fi4253
10Luottamuksen palauttaminen internettiinOp_fi4259
11Monipuoliset sisällötOp_fi4256
12Oma Painotus Teema IOp_fi4257
13Oma Painotus Teema IIOp_fi4262
14Oma Painotus Teema IIIOp_fi4267
15Tieto ja digitalisaatio liikenteessäOp_fi4261
16Toimintavarmuus ja turvallisuusOp_fi4263
17Älykkäät käyttäjälähtöiset digitaaliset palvelutOp_fi4255

Katso myös

Viitteet