Hoď ma hore
prihlásenie:
Registrácia  |  Zabudnuté heslo
tu sa nachádzate: hlavná stránka  počítače  téma
kategórie:  

R-ko 2017

1
reakcií
878
prečítaní
Tému 30. marca 2017, 07:59 založil Sklovska.

podobné témy:

názov témy
posledná
reakcií
30. 03. 2017
1
11. 11. 2007
15
03. 07. 2016
0
15. 07. 2010
102
26. 05. 2011
98
 
 


1.
označiť príspevok

Sklovska
   30. 3. 2017, 07:59 avatar
ul.1B
f = seq(0,100,by = 5)
for (i in 1:21) {
if(f[i] < 50)
{f[i] = f[i] + 1
print(f[i])}
}

for (i in 1:21) {
if (f[i] == 50)
{f[i] = 50/0}
print(f[i])
}

for (i in 1:21) {
if(f[i] >= 50)
{f[i] = f[i] - 1}
print(f[i])
}
.............................................
Uloha 2b
getwd()
dir.create("data\Zapocet1"
setwd("C:/Users/Documents/data/Zapocet1"

fileUrl = "www.w3schools.com Tento odkaz smeruje mimo DF.sk
doc = xmlTreeParse(fileUrl,useInternal=TRUE)
root = xmlRoot(doc)
xmlName(root)
root[[2]]
xpathSApply(root,"//price",xmlValue)
.........................................................................................
ul3b
set.seed(20)
tabulka = data.frame(a=rep(c("a","b",each=10),b = rnorm(20),c = seq(1, 100,by = 5), d = 1:20)

lapply = (tabulka$d,quantile,probs = seq(0,0.48,0.56)))
colSums(tabulka, tabulka$b,tabulka$c,tabulka$d)
quantile(tabulka$d,c(0,0.48,0.56))
colSums(tabulka[,2:4])

tabulka[,mean(c)]
any(is.na(tabulka$c))
sort(tabulka$b)
tabulka[,E:=b^2]
.....................................................................................
ul4
library(datasets)

par(mfrow = c(2, 1), mar = c(4, 4, 2, 1))
hist(CO2$conc, col = "Green", main = "Conc", breaks = 4)
hist(CO2$uptake, col = "Blue",,breaks = 40, xlab = "up", ylab = "take", main = "Uptake"
legend(x="topright", legend = levels(CO2$uptake))

library(ggplot2)
qplot(uptake, age, data = CO2, col = Type)


2.
označiť príspevok

Slušný človek muž
   30. 3. 2017, 09:05 avatar
Sisa?
váš príspevok

Pridávať príspevky môžu iba zaregistrovaní účastníci fóra.

Som zaregistrovaný

nick: heslo:
zostať trvalo prihlásený    
Nie som zaregistrovaný

Vaša prezývka:  

Po zaregistrovaní budete automaticky presmerovaní do tejto témy.

najnovšie príspevky na celom fóre

dnes, 07:20,  Miro Jaroš & Nela Pocisková - NECH UŽ NASNEŽÍ (Oficiálny videoklip)
dnes, 06:41,  tento vedec povedal počas 2.sv.v že slovensko bude mať veľký problém s gaymi a to sa aj deje
dnes, 03:47,  Cigánsky teror nie je do smiechu
dnes, 03:45,  Keď nevyhraju kiskovci-trubanovci-matovicovci dobrá sprava pre Slovensko
dnes, 03:39,  teraz neviem ci je to do smiech ( do placu?) http://diskusie.slovakforum.net/t376-topic
dnes, 01:40,  Nejako hlúpo si to napísal. SMER voľby vyhrá. A druhí budú kotlebovci. Takže prehrajú...
dnes, 01:36,  Bijjou, môžeš aj ty pomôcť.*19
dnes, 01:34,  Je humanistická zbierka: Protect Humanists At Risk. Prispeješ? Pozri:...
dnes, 01:31,  Nie, lebo riskujem, že nebudem na to mať. Môžem prispievať malými čiastkami. Pri povedzme...
dnes, 01:28,  Budeš môj priateľ, keď sa Ti podarí osloviť Kasafrana a Havrana, aby prispeli priamo do...
dnes, 01:24,  83. prečo maj sa . ja nikam nejdem az zajtra *39
dnes, 01:21,  Ok. Tak na mňa už nikdy nereaguj. Maj sa.
dnes, 01:19,  80. sorry, nenamáhaj sa, ja si tvoje videá uz nepozerám.
dnes, 00:59,  niektoré ženy ešte pred 50 rokom života si myslia, muž nie je našou národnou vlajkou
dnes, 00:46,  super
dnes, 00:45,  ja nie som Jánošík. *21
dnes, 00:45,  https://www.mojevideo.sk/video/1950d/nadavky_v_slovenskych_filmoch.html Ináč 0:23. Scarlet...
dnes, 00:45,  samozrejme
dnes, 00:44,  75. ale prd, ja ta mám na háku . a odteraz uz definívne *39
dnes, 00:42,  Ondrej. ve´d Kristus podporoval farizejov. Budte čím chcete. Ste super *18*03
neprehliadnite
df.sk na Facebooku
vyhľadávanie
 
Nehovor hop, ani keď preskočíš. Najprv sa pozri, do čoho si skočil.
Prevádzkuje df.sk | TOPlist
(47 366 bytes in 0,722 seconds)