小编Ess*_*ssi的帖子

我怎样才能删除这个情节的所有标签？或者，甚至更好，我怎样才能使它可读？

我用这个命令创建了它：

plot(hclust(distance), main="Dissimilarity = 1 - Correlation", xlab= NA, sub=NA)

我读了很多遍，实际上xlab或sub应该删除标签，但它对我不起作用！

我的情节是这样的：

我发现了与我类似的问题，但没有一个解释如何为数据框的每一列执行此操作。

我有一个这样的数据框：

x1 = seq(12, 200, length=20)
x2 = seq(50, 120, length=20)
x3 = seq(40, 250, length=20)
x4 = seq(100,130, length=20)
x5 = seq(10, 300, length=20) 

df = data.frame(V1=x1, V2=x2, V3=x3, V4=x4, V5=x5) 

现在我想获取每列大于 120 的值的数量。

我试过了：

nrow(df[,1] >120)

那没有用，它说 0，但它不是真的，而且我想自动完成所有列。

我昨天已经问了同样的问题,但直到现在我还没有得到任何建议,所以我决定删除旧的,然后再问,给予额外的信息.

再来一次:

我有这样的数据帧:

链接到原始数据框:https://megastore.uni-augsburg.de/get/JVu_V51GvQ/

      Date   DENI011
1 1993-01-01   9.946
2 1993-01-02  13.663
3 1993-01-03   6.502
4 1993-01-04   6.031
5 1993-01-05  15.241
6 1993-01-06   6.561
     ....
     ....
6569 2010-12-26  44.113
6570 2010-12-27  34.764
6571 2010-12-28  51.659
6572 2010-12-29  28.259
6573 2010-12-30  19.512
6574 2010-12-31  30.231

我想创建一个图表,使我能够比较多年来DENI011中的月度值.所以我想要这样的东西:

http://r-statistics.co/Top50-Ggplot2-Visualizations-MasterList-R-Code.html#Seasonal%20Plot

1月至12月的x尺度,y尺度的值和不同颜色线显示的年份.

我在这里发现了几个类似的问题,但对我来说没什么用.我试图按照网站上的说明进行示例,但问题是我无法创建一个ts对象.

然后我这样试了:

Ref_Data$MonthN <- as.numeric(format(as.Date(Ref_Data$Date),"%m")) # Month's number
Ref_Data$YearN <- as.numeric(format(as.Date(Ref_Data$Date),"%Y"))
Ref_Data$Month  <- months(as.Date(Ref_Data$Date), abbreviate=TRUE) # Month's abbr.

g <- ggplot(data = Ref_Data, aes(x = MonthN, y = DENI011, group …

我的数据框中有问题。

https://gofile.io/?c=eNeEAL

我有几个带有 -Inf 条目的值。当我想使用 cor-function 时，我总是因此得到 NA。所以我想在使用 cor-function 之前用 NA 替换 -Inf，但我找不到成功替换它们的方法。

我试过

dat[mapply(is.infinite, dat)] <- NA

但它没有用。

任何想法如何解决这个问题？

我有一个时间格式如下的数据框：

Time
01.01.2017 01:00
01.01.2017 02:00
01.01.2017 03:00
01.01.2017 04:00 
01.01.2017 05:00 
01.01.2017 06:00

class(df$Time) 
[1] "factor"

它的日，月，年，小时，分钟。我想将其转换为可读时间。我已经尝试过了：

strptime(df$Time, format="%d-%m-%Y  %H:%M")
as.POSIXct(df$Time)

它不起作用。如何将其转换并将格式更改为：2017-01-01 01:00。所以我要有年，月，日，小时，分钟。

我有一个像这样的数据框：

x1= c("Station 1", "Station 1", "Station 2", "Station 3", "Station 3", "Station 3")
x2= c("1993-06-08", "1994-06-09", "1982-06-10", "1993-06-11", "1992-06-12", "1997-06-13")
x3= seq(5, 30, length=6)
x4= seq(4, 16, length=6)
x5= seq(10, 60, length=6) 

testframe = data.frame(Station=x1, Date=x2, Morning=x3, Noon=x4, Evening=x5) 

testframe[,2] = as.Date(testframe[,2], format="%Y-%m-%d")
class(testframe$Date) 

现在我想删除 1993 年 1 月 1 日之前记录的所有行。

我这样做了：

index = testframe[,2] >= "1993-01-01" 

它返回正确和错误的正确列表，但我不知道如何继续。

我尝试过这个，但没有成功：

new = testframe[index]
new = [-c(testframe[index]),]

有人可以帮忙吗？我知道这应该很容易，但我不明白。