# INIZIO PRIMO ESEMPIO ********************************

# GENERA DUE VETTORI E LI COMBINA IN UNA MATRICE

# UN VETTORE
# genera gli interi da 1 a 10
x <- 1:10

# UN VETTORE
# genera dieci valori di deviata normale standardizzata z
y <- rnorm(10)

# COMBINA I VETTORI IN UNA MATRICE
# combina x e y nell'oggetto mymatrix
mymatrix <- data.frame(x,y)

# mostra l'oggetto mymatrix
mymatrix

# assegna i nomi alle variabili/colonne
names(mymatrix) <- c("Progressivo", "Deviata normale standardizzata z")

# mostra mymatrix
mymatrix

# assegna un descrittore ai casi/righe
row.names(mymatrix) <- c("Uno","Due","Tre","Quattro","Cinque","Sei","Sette","Otto","Nove","Dieci") 

# mostra mymatrix
mymatrix

# FINE PRIMO ESEMPIO ********************************

# INIZIO SECONDO ESEMPIO ********************************

# GENERA UNA MATRICE 2x2

# array con i valori (numerici) contenuti nelle celle
cells <- c(1,26,24,68)

# array con i nomi delle righe
rnames <- c("R1", "R2")

# array con i nomi delle colonne
cnames <- c("C1", "C2") 

# costruisce la matrice con i valori numerici e i nomi definiti sopra
mymatrix <- matrix(cells, nrow=2, ncol=2, byrow=TRUE,
  dimnames=list(rnames, cnames)) 

# mostra mymatrix
mymatrix

# FINE SECONDO ESEMPIO ********************************

# INIZIO TERZO ESEMPIO ********************************

# GENERA UN DATAFRAME (sinonimo di DATASET in SPSS e in SAS)
# puņ contenere variabili sia numeriche, sia alfanumeriche, sia logiche

# array con valori numerici
d <- c(9901,9902,9903,9904)

# array con valori alfanumerici
e <- c("rosso", "bianco", "blu", NA)

# array con valori logici
f <- c(TRUE,TRUE,TRUE,FALSE)

# genera il dataframe/dataset
mydataset <- data.frame(d,e,f)

# assegna i nomi alle variabili/colonne
names(mydataset) <- c("Identificativo","Colore","Dato valido") 

# mostra mydataset
mydataset

# FINE TERZO ESEMPIO ********************************