Rinomina righe e colonne in R

Question

Sono in esecuzione il seguente script:

cause = c(1, 1, 1, 1, 1, 2, 1, 2, 2, 2, 2); 
time =  c(1, 1, 2, 3, 3, 2, 2, 1, 1, 2, 2); 
table(cause, time)

E ottengo il seguente:

    time
cause 1 2 3
    1 2 2 2
    2 2 3 0

Quello che voglio è questa:

      time
cause     1 2 3
Maltreat  2 2 2
Non-Maltr 2 3 0

Quindi, la mia domanda è: come si fa a rinominare le righe di una tabella in R

?

Nella stessa vena, come è possibile rinominare le colonne di quel tavolo?

Answer 1

Un modo per farlo è quello di utilizzare fattori o liste di stringhe invece di indici. Quindi:

cause1 <- c("Maltreat", "Non-malt")[cause]

> print(cause1)
 [1] "Maltreat" "Maltreat" "Maltreat" "Maltreat" "Maltreat" "Non-malt"
 [7] "Maltreat" "Non-malt" "Non-malt" "Non-malt" "Non-malt"

> table(cause1, time)
          time
cause1     1 2 3
  Maltreat 2 2 2
  Non-malt 2 3 0

E, nel caso in cui siete preoccupati per la memoria o la velocità, R è abbastanza bravo a rappresentare questo genere di cose in modo efficiente internamente, con solo una singola istanza di tutta la stringa memorizzata, e il resto fatto con gli indici.

Per inciso, sarai più felice nel lungo periodo con frame di dati:

> df <- data.frame(cause=as.factor(c("Maltreat", "Non-malt")[cause]), time=time)
> summary(df)
      cause        time      
 Maltreat:6   Min.   :1.000  
 Non-malt:5   1st Qu.:1.000  
              Median :2.000  
              Mean   :1.818  
              3rd Qu.:2.000  
              Max.   :3.000  
> table(df)
          time
cause      1 2 3
  Maltreat 2 2 2
  Non-malt 2 3 0

Answer 2

Ci sono due semplici modi per farlo:

z <- table(cause, time)

Utilizzare i colnames / funzioni rownames:

> colnames(z)
[1] "1" "2" "3"
> rownames(z)
[1] "1" "2"

o utilizzare dimnames:

> dimnames(z)
$cause
[1] "1" "2"
$time
[1] "1" "2" "3"
> dimnames(z)$cause
[1] "1" "2"

In ogni caso, scegliere i nomi come vettore e assegnarli:

> dimnames(z)$cause <- c("Maltreat","Non-malt")
> z
          time
cause      1 2 3
  Maltreat 2 2 2
  Non-malt 2 3 0

Answer 3

Non dimenticare meravigliosa comando "rivalutare" e "rinomina" di plyr!