Kebingungan antara level faktor dan label faktor

Tampaknya ada perbedaan antara level dan label sebuah faktor di R. Hingga saat ini, saya selalu berpikir bahwa level adalah nama 'sebenarnya' dari level faktor, dan label adalah nama yang digunakan untuk output (seperti tabel dan plot) . Jelas, ini bukan masalahnya, seperti yang ditunjukkan contoh berikut:

df <- data.frame(v=c(1,2,3),f=c('a','b','c'))
str(df)
'data.frame':   3 obs. of  2 variables:
 $ v: num  1 2 3
 $ f: Factor w/ 3 levels "a","b","c": 1 2 3

df$f <- factor(df$f, levels=c('a','b','c'),
  labels=c('Treatment A: XYZ','Treatment B: YZX','Treatment C: ZYX'))
levels(df$f)
[1] "Treatment A: XYZ" "Treatment B: YZX" "Treatment C: ZYX"

Saya pikir level ('a', 'b', 'c') masih bisa diakses saat membuat skrip, tetapi ini tidak berhasil:

> df$f=='a'
[1] FALSE FALSE FALSE

Tapi ini memang:

> df$f=='Treatment A: XYZ' 
[1]  TRUE FALSE FALSE

Jadi, pertanyaan saya terdiri dari dua bagian:

• Apa perbedaan antara level dan label?

• Apakah mungkin memiliki nama yang berbeda untuk tingkat faktor untuk skrip dan keluaran?

Latar belakang: Untuk skrip yang lebih panjang, skrip dengan level faktor pendek tampaknya jauh lebih mudah. Namun, untuk laporan dan plot, tingkat faktor yang pendek ini mungkin tidak memadai dan harus diganti dengan nama pendahulu.

Sangat singkat: level adalah input, label adalah output dalam factor()fungsi. Faktor hanya memiliki levelatribut, yang ditetapkan oleh labelsargumen dalam factor()fungsi. Ini berbeda dengan konsep label dalam paket statistik seperti SPSS, dan dapat membingungkan pada awalnya.

Apa yang Anda lakukan di baris kode ini

df$f <- factor(df$f, levels=c('a','b','c'),
  labels=c('Treatment A: XYZ','Treatment B: YZX','Treatment C: ZYX'))

memberi tahu R bahwa ada vektor df$f

• yang ingin Anda ubah menjadi faktor,
• di mana tingkat-tingkat yang berbeda dikodekan sebagai a, b, dan c
• dan yang Anda ingin levelnya diberi label sebagai Perlakuan A dll.

Fungsi faktor akan mencari nilai a, b dan c, mengubahnya menjadi kelas faktor numerik, dan menambahkan nilai label ke levelatribut faktor tersebut. Atribut ini digunakan untuk mengubah nilai numerik internal menjadi label yang benar. Tapi seperti yang Anda lihat, tidak ada labelatribut.

> df <- data.frame(v=c(1,2,3),f=c('a','b','c'))    
> attributes(df$f)
$levels
[1] "a" "b" "c"

$class
[1] "factor"

> df$f <- factor(df$f, levels=c('a','b','c'),
+   labels=c('Treatment A: XYZ','Treatment B: YZX','Treatment C: ZYX'))    
> attributes(df$f)
$levels
[1] "Treatment A: XYZ" "Treatment B: YZX" "Treatment C: ZYX"

$class
[1] "factor"

Saya menulis paket "lfactors" yang memungkinkan Anda merujuk ke level atau label.

# packages
install.packages("lfactors")
require(lfactors)

flips <- lfactor(c(0,1,1,0,0,1), levels=0:1, labels=c("Tails", "Heads"))
# Tails can now be referred to as, "Tails" or 0
# These two lines return the same result
flips == "Tails"
#[1]  TRUE FALSE FALSE  TRUE  TRUE FALSE
flips == 0 
#[1]  TRUE FALSE FALSE  TRUE  TRUE FALSE

Perhatikan bahwa sebuah lfactor mensyaratkan bahwa level-level tersebut berupa angka sehingga tidak dapat disalahartikan dengan label.