Question

您好我有以下数据框（Unt）：

   [[UITabBar appearance] setTintColor: [UIColor redColor]];

我正在尝试删除行和＃34;星期天＆＃34;和＆＃34;星期六＆＃34;。我尝试了以下

    Day       sunrise   sunset   day.length

1    Monday     6.42    19.97       13.55
2    Monday     6.42    19.97       13.55
3    Monday     6.42    19.97       13.55
4    Monday     6.42    19.97       13.55
5    Monday     6.42    19.97       13.55
6    Monday     6.42    19.97       13.55
7    Monday     6.42    19.97       13.55
8    Friday     6.42    19.97       13.55
9    Friday     6.42    19.97       13.55
10   Friday     6.42    19.97       13.55
11   Saturday       6.42    19.97       13.55
12   Saturday       6.42    19.97       13.55
13   Saturday       6.42    19.97       13.55
14   Saturday       6.42    19.97       13.55
15   Saturday       6.42    19.97       13.55
16   Sunday     6.42    19.97       13.55
17   Sunday     6.42    19.97       13.55
18   Sunday     6.42    19.97       13.55
19   Sunday     6.42    19.97       13.55

然而，在任何情况下都没有删除行。

Answer 1

根据上一个问题here中的错误输出，您有" Friday", " Monday"作为输入。领先的空间被剥离，因为人们在这里试图重现，你需要使用dput(Unt)而不是粘贴，所以这样的事情不会发生。

我猜你的星期六和星期日列是一样的，所以试试：

Unt[!(Unt$Day %in% c(" Saturday", " Sunday")), ]

或者在阅读csv时删除它们。

Answer 2

以下是您问题的可能解决方案

day.length <- c(rep(13.55, 19))
Day <- factor(c(rep("Monday", 7), rep("Friday", 3),
rep("Saturday", 5), rep("Sunday", 4)))
sunset <- c(rep(6.42, 19))
sunrise <- c(rep(19.97, 19))

df <- data.frame(Day, sunrise, sunset, day.length )
df2 <- subset(df, Day!= "Sunday" & Day!= "Saturday")

df2就是你想要的。正如jeremycg所指出的，你应该从你的Day变量中删除任何空格。

OP，当您将数据上传到R并查看是否可以解决问题时，您可以尝试在strip.white = TRUE中添加data <- read.csv("data.csv", header = TRUE, strip.white = TRUE)或者，您可以在加载数据后删除空白区域 - 有关详细信息，请参阅此post。否则，如果没有访问创建问题的原始数据集，将很难提供帮助。

无法删除行

2 个答案: