ความสับสนระหว่างระดับปัจจัยและป้ายกำกับปัจจัย

ดูเหมือนจะมีความแตกต่างระหว่างระดับและป้ายกำกับของปัจจัยใน R จนถึงตอนนี้ฉันคิดเสมอว่าระดับเป็นชื่อ 'จริง' ของระดับปัจจัยและป้ายกำกับเป็นชื่อที่ใช้สำหรับเอาต์พุต (เช่นตารางและพล็อต) . เห็นได้ชัดว่านี่ไม่ใช่กรณีดังตัวอย่างต่อไปนี้:

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"

ฉันคิดว่าระดับ ('a', 'b', 'c') ยังสามารถเข้าถึงได้เมื่อเขียนสคริปต์ แต่สิ่งนี้ใช้ไม่ได้:

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

แต่สิ่งนี้ทำ:

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

ดังนั้นคำถามของฉันประกอบด้วยสองส่วน:

• ระดับและป้ายกำกับต่างกันอย่างไร

• เป็นไปได้ไหมที่จะมีชื่อต่างกันสำหรับระดับแฟคเตอร์สำหรับการเขียนสคริปต์และเอาต์พุต

ความเป็นมา: สำหรับสคริปต์ที่ยาวขึ้นการเขียนสคริปต์ด้วยระดับปัจจัยสั้น ๆ ดูเหมือนจะง่ายกว่ามาก อย่างไรก็ตามสำหรับรายงานและพล็อตระดับปัจจัยสั้น ๆ นี้อาจไม่เพียงพอและควรแทนที่ด้วยชื่อตัวกำหนด

สั้นมาก: ระดับคืออินพุตป้ายกำกับคือเอาต์พุตในfactor()ฟังก์ชัน ปัจจัยมีเพียงlevelแอตทริบิวต์ซึ่งกำหนดโดยlabelsอาร์กิวเมนต์ในfactor()ฟังก์ชัน ซึ่งแตกต่างจากแนวคิดของฉลากในแพ็คเกจทางสถิติเช่น SPSS และอาจทำให้สับสนได้ในช่วงแรก

สิ่งที่คุณทำในบรรทัดของรหัสนี้

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

กำลังบอกกับ R ว่ามีเวกเตอร์ df$f

• ที่คุณต้องการแปลงเป็นตัวประกอบ
• ซึ่งระดับต่างๆจะมีรหัสเป็น a, b และ c
• และที่คุณต้องการให้ระดับถูกระบุว่าเป็น Treatment A เป็นต้น

ฟังก์ชันแฟกเตอร์จะค้นหาค่า a, b และ c แปลงเป็นคลาสตัวประกอบตัวเลขและเพิ่มค่าเลเบลให้กับlevelแอตทริบิวต์ของแฟคเตอร์ แอ็ตทริบิวต์นี้ใช้เพื่อแปลงค่าตัวเลขภายในเป็นเลเบลที่ถูกต้อง แต่อย่างที่คุณเห็นไม่มีlabelแอตทริบิวต์

> 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"

ฉันเขียนแพ็คเกจ "lfactors" ที่ให้คุณอ้างถึงระดับหรือป้ายกำกับ

# 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

โปรดทราบว่า lfactor ต้องการให้ระดับเป็นตัวเลขเพื่อไม่ให้สับสนกับป้ายกำกับ