2016-08-13 47 views
8

我有在我的R.雷達圖有點麻煩即使情節是好的我得到以下警告:警告:在複製的因素水平已被棄用

> source('~/.active-rstudio-document') 
Warning message: 
In `levels<-`(`*tmp*`, value = if (nl == nL) as.character(labels) else paste0(labels, : 
    duplicated levels in factors are deprecated 
> radar 
Warning messages: 
1: In `levels<-`(`*tmp*`, value = if (nl == nL) as.character(labels) else paste0(labels, : 
    duplicated levels in factors are deprecated 
2: In `levels<-`(`*tmp*`, value = if (nl == nL) as.character(labels) else paste0(labels, : 
    duplicated levels in factors are deprecated 

我已經看到了同樣的錯誤在其他職位,但我真的不知道如何解答應用到我的數據集...

這是我的數據集

MSF,C1,2 
OCA,C1,6 
SIOA,C1,4 
CCFF,C1,4 
MSF,C2,4 
OCA,C2,2 
SIOA,C2,6 
CCFF,C2,2 
MSF,C3,6 
OCA,C3,6 
SIOA,C3,6 
CCFF,C3,6 

這是爲correspo代碼nding雷達圖(可能只在我定義我的數據集是相關的,但是是啊...這就是我丟失的第一部分):

colnames(dataset) = c("type", "variable", "value") 
dataset$value = as.numeric(dataset$value) 

dataset$variable <- factor(dataset$variable, levels = rev(dataset$variable), ordered=TRUE) 

# Radar function ------------------------------------------------------------ 
coord_radar <- function (theta = "x", start = 0, direction = 1) { 
    theta <- match.arg(theta, c("x", "y")) 
    r <- if (theta == "x") 
    "y" 
    else "x" 
    ggproto("CordRadar", CoordPolar, theta = theta, r = r, start = start, 
      direction = sign(direction), 
      is_linear = function(coord) TRUE) 
} 


# Radar plot ------------------------------------------------------------ 
radar <- ggplot(dataset, aes(x = variable, y = value, group=type)) + 
    geom_polygon(aes(group = type, color=type,fill=type), size = 1, alpha=0.1) + 
    scale_fill_manual(values=cbPalette) + 
    geom_line(aes(group = type, color=type)) + 
    scale_colour_manual(values = cbPalette) + 
    coord_radar() 

回答

15

是,幾乎所有的這無關你的問題。

您正試圖創建一個具有以下級別的因子:rev(dataset$variable)。這會產生:

[1] C3 C3 C3 C3 C2 C2 C2 C2 C1 C1 C1 

看看您是如何複製的級別?你只需要按照你想要的順序每個級別一次。默認值爲sort(unique(dataset$variable)),這會給出C1 C2 C3,或者您可以使用rev(unique(dataset$variable)給出C3 C2 C1

forcats包有幾個便利功能,可輕鬆製作或更改因素及其級別的順序。

+0

太好了,非常感謝您的回覆!行'dataset $ variable < - factor(dataset $ variable,levels = rev(unique(dataset $ variable)),ordered = TRUE)'這樣做 – Jonas

相關問題