Hoď ma hore
prihlásenie:
Registrácia  |  Zabudnuté heslo
tu sa nachádzate: hlavná stránka  rôzne  téma
kategórie:  

R-ko

1
reakcií
1036
prečítaní
Tému 29. marca 2017, 23:58 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
   29. 3. 2017, 23:58 avatar
ul.1A
funkcia <- function(n){
for(i in 1:n){
if(i %% 2 == 0){ print(i^2)}
else if((i %% 3 == 0) && (i %% 5 == 0)) {print(i^3)}
else {print(i)}
}
}
funkcia(7)
---------------------------------------------------------------
ul.2A
getwd()
dir.create("Zapocet1"
setwd("C:/Users/Sára/Documents/Zapocet1"
dir.create("data"
fileURL = "samplecsvs.s3.amazonaws.com Tento odkaz smeruje mimo DF.sk
download.file(fileURL, destfile = "./SalesJan2009.csv"
data = read.csv("./SalesJan2009.csv"
head(data, n = 10)
tail(data, n = 15)
data[1:5,2:3]
--------------------------------------------------------------
ul.3A
set.seed(10)
install.packages("data.table"
library(data.table)
tabulka = data.table(A=rnorm(10),B=1:10,C=10:1,D=rep(factor(c("a","b"),each = 5))
tabulka[[1]][2] = NA
tabulka[[1]][4] = NA
tabulka
tabulka[(which(tabulka$A != is.na(A))),mean(A)]
tabulka[,e:=B^2]
tabulka
tabulka[,f:=sum(B),by=D]
sort(tabulka$C)
tabulka[order(tabulka$C),]
--------------------------------------------------------------
ul.4A
library(datasets)
attach(infert)
boxplot(age ~ education, infert, col = "red", xlab = "Age", ylab = "Education", main = "infert"
abline(h = 30, lwd = 3, lty = 2, col = "blue"
library(lattice)
xyplot(stratum ~ age | education, data = infert)


2.
označiť príspevok

gabriel pb
   30. 3. 2017, 23:03 avatar
programovanie v kurze
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, 12:47,  V Rusku....
dnes, 12:45,  Žiadny uhol ;) Zmŕtvychvstanie je hoax ;)
dnes, 12:43,  30 Americkí trolovia radi opakujú hlášky: Títo visia na ruskom cecku. Treba sa vysporiadať...
dnes, 12:43,  To je vec uhla pohľadu :)
dnes, 12:42,  Keď mohol byť prezidentom, môže byť aj vo vláde...
dnes, 12:34,  (1) Kntsz, predpokladali Tvoji rodičia, že budú mať v Tebe potomka ideovo a mravne...
dnes, 12:32,  majko1 - zlodej vie že má kričať "chyťte zlodeja"
dnes, 12:31,  ondrej vy totaliťáci prenasledujete ľudí za názor podobne ako ortodoxní komunisti :)
dnes, 12:28,  Strana vlasť bude výraz volieb
dnes, 12:28,  Boris Túžba po moci vie ohnúť aj tie najpevnejšie chrbtice - tá vôňa je neodolateľná a...
dnes, 12:21,  Z mŕtvych vstávajú len zombíci v amerických filmoch ;)
dnes, 12:20,  Osvietený - mal si sa k nim postaviť, asi tam patríš
dnes, 12:17,  31- reaguješ na niečo, čo ťa presahuje a na čo nemáš rozumovú a ani mentálnu výbavu a...
dnes, 12:15,  Oprava: (1) Scarlet...
dnes, 12:14,  (10) Scarlet, skús pouvažovať, či autor Tebou zverejneného článku o svojom spolužiakovi...
dnes, 11:55,  Je to presne naopak :)
dnes, 11:35,  porovnavať komunistický cirkus s demokracoiu, ktoru tu mame, môže akurat idiot formatu...
dnes, 11:23,  Keby si bol dôsledný v myslení, tak takému bludu nemôžeš uveriť ;)
dnes, 11:00,  Ortodoxní komunisti ako totaliťáci ala ondrej tiež postavili mantinely obmedzovania slobody...
dnes, 10:59,  Osvietený - ukľudni sa, predýchaj , asi si dnes nervózny. Choď voliť radšej tú svoku...
neprehliadnite
df.sk na Facebooku
vyhľadávanie
 
V boji o vlastné štastie víťazí ten, kto sa nevzdáva.
Prevádzkuje df.sk | TOPlist
(48 005 bytes in 0,433 seconds)