Question

在我的脚本中，我已经转换了这个data.frame，如下所示：

where ab.id is not null or ap.id is not null

结果如下：

df.modified<-transform(df, new.col= Payment.date-Selectionfinal$Invoice.Date)

然后，我需要将其绘制成直方图，但我有这个问题：

    Client.Code. Invoice.Date Payment.date  new.col
1:      1004850   2016-01-31   2016-11-22 296 days
2:      1004850   2016-06-30   2016-11-22 145 days
3:      1004850   2016-06-30   2016-11-22 145 days
4:      1004850   2016-06-30   2016-11-22 145 days
5:      1004850   2016-09-30   2016-11-22  53 days

这是我的df：

> hist(df.modified[,c(4)])
Error in hist.default(Completo[, c(4)]) : 'x' must be numeric

我想知道这个诀窍。谢谢。

Answer 1

正如Kristofersen已经指出的那样，问题在于你作为数据传递给hist函数的类型。数据预计为numeric，不接受difftime。

# some data mimicking your data
Client.Code. <- c(1004850, 1004849, 1004850, 1004850, 1004851)
Invoice.Date <- as.Date(c("2016-01-31", "2016-03-30", "2016-06-30", "2016-06-30", "2016-04-30"))
Payment.date <- as.Date(c("2016-11-22", "2016-10-22", "2016-09-22", "2016-08-22", "2016-10-09"))
# creating the new column in a similar way to your way
df <- data.frame(Client.Code., Invoice.Date, Payment.date)
df$new.col <- df$Payment.date - df$Invoice.Date

## the following 3 do not work because they pass difftime to hist()
hist(df[,c(4)])
hist(df[,4])
hist(df$new.col)

# class of difftime
class(df$new.col)

## these 3 do work: numeric is passed to hist()
hist(as.numeric(df$new.col))
hist(as.numeric(df[,4]))
hist(as.numeric(df[,c(4)]))

R将类DIFFTIME修改为hist

1 个答案: