Ero sivun ”Kommenttihaku” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
(→‎Vastaus: nyt toimii)
 
Rivi 9: Rivi 9:
<rcode embed=1 variables="
<rcode embed=1 variables="
name:tunniste|description:Anna haettavan kommentin tunnistelinkki. Jos tyhjä, näytetään kaikki.|type:text|
name:tunniste|description:Anna haettavan kommentin tunnistelinkki. Jos tyhjä, näytetään kaikki.|type:text|
name:nayta|description:Näytetäänkö myös poistetut kommentit?|type:selection|options:FALSE;Ei;TRUE;Kyllä|default:FALSE
name:piilota|description:Piilotetaanko poistetut kommentit?|type:selection|
options:TRUE;Kyllä;FALSE;Ei|default:TRUE
">
">


Rivi 23: Rivi 24:
dat,  
dat,  
data.frame(
data.frame(
Sivu = sivut$Nimi[i],  
Sivu = sivut$Nimi[i],  
opbase.data(sivut$Tunniste[i], subset = "Kommentit"))
opbase.data(sivut$Tunniste[i], subset = "Kommentit")
)
)
)


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


Rivi 38: Rivi 45:
"#Kommentit", sep = ""
"#Kommentit", sep = ""
)
)
oprint(poistot)
if(!nayta) {
test <- paste(dat$Sivu, dat$Obs) %in% paste(poistot$Sivu, poistot$Kommenttinro)
dat <- dat[test , ]
}


oprint(dat)
oprint(dat)

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

Noudettu kohteesta ”https://fi.opasnet.org/index.php?title=Kommenttihaku&oldid=23396”