如何继续使用缺少一级（已删除）的因子？

Question

我正在使用我下载的一组 Fitbit 数据，它有一个我试图正确订购的工作日列表。现在，当前的数据集没有“星期五”，但无论如何我都希望这些因素包括它。

即使数据集中只有 6 个工作日，我如何继续将工作日计算为 1-7？

file<-choose.files()
   slp<-data.frame(read.csv(file))

   wkdaylevels<-c("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")

    slp$FellAsleepAt<-strptime(slp$FellAsleepAt, format="%B %e, %Y at %I:%M%p")
    slp$AwokeAt<-strptime(slp$AwokeAt,format="%B %e, %Y at %I:%M%p")
    slp$TotalTimeSlept<-gsub("h ",":",slp$TotalTimeSlept)
    slp$TotalTimeSlept<-gsub("m","",slp$TotalTimeSlept)
    slp$TimeAsleep<-as.numeric(difftime(slp$AwokeAt,slp$FellAsleepAt))
    slp$Date<-as.Date(slp$FellAsleepAt, format="%M/%D/%Y")
    slp$DayofWeek<-as.factor(weekdays(slp$Date),levels=wkdaylevels)



    ggplot(slp,aes(x=DayofWeek,y=TimeAsleep))+
        geom_point()

这里的数据：https : //docs.google.com/spreadsheets/d/1Vdgmtwx0vNKDKEZFMEGAWQ58H66ia-xjI0evR7idfkc/edit?usp=sharing

Answer 1

答：factor不使用as.factor

该函数将as一个对象强制转换为一个类。在您的情况下，as.<type>强制转换为类型（您的因素）。该函数factor用于将对象编码为因子。关键区别在于as.factor不允许使用 levels 参数，而允许使用factor。

如果您检查每个函数的源代码，您将看到as.factor通过使用对象的唯一级别作为其级别来执行强制转换。factor如果levels=未指定参数，则执行此操作，但允许输入级别。

例如：

x <- 1:6
x2 <- factor(x, levels= 1:7)
levels(x2)
[1] "1" "2" "3" "4" "5" "6" "7"
x2 <- as.factor(x, levels= 1:7) # in this case, levels won't be evaluated due to lazy evaluation
Error in as.factor(x, levels = 1:7) : unused argument (levels = 1:7)

TBH，我不确定为什么你的 R 会话没有给你这个错误。你在使用 R 3.2.3 吗？