14

我有一个数据框,其中的列最初是任意标记的。稍后,我想将这些级别更改为数值。以下脚本说明了该问题。

library(ggplot2)
library(reshape2)

m <- 10
n <- 6

nam <- list(c(),letters[1:n])
var <- as.data.frame(matrix(sort(rnorm(m*n)),m,n,F,nam))
dtf <- data.frame(t=seq(m)*0.1, var)
mdf <- melt(dtf, id=c('t'))

xs <- c(0.25,0.5,1.0,2.0,4.0,8.0)
levels(mdf$variable) <- xs

g <- ggplot(mdf,aes(variable,value,group=variable,colour=t))
g +
    geom_point() +
    #scale_x_continuous() +
    opts()

产生了这个情节。

在此处输入图像描述

“可变”量在图上均匀分布,即使在数值上这不是真的。如何获得正确的 x 轴间距?

4

2 回答 2

20

我认为您可以简单地通过将变量转换为数字来做到这一点:

mdf$variable <- as.numeric(as.character(mdf$variable))

g <- ggplot(mdf,aes(variable,value,group=variable,colour=t))
g +
    geom_point() +
    #scale_x_continuous() +
    opts()
于 2011-06-17T13:23:49.813 回答
5

您需要将因子转换为数字:

mdf$numVariable <- as.numeric(as.character(mdf$variable))

g <- ggplot(mdf,aes(numVariable,value,group=variable,colour=t))
g +
    geom_point() +
    #scale_x_continuous() +
    opts()

或者只是在调用 ggplot 时进行转换:

g <- ggplot(mdf,aes(as.numeric(as.character(variable)),value,group=variable,colour=t))
于 2011-06-17T13:26:23.633 回答