R子集邏輯

Question

我有一個基於兩個變量（分區，deployment.date）的子集的數據列表。根據文章和手冊，我應該能夠用一個＆符號來完成它。然而，我所看到的是，每個人都可以獨立工作，但在合併時無法工作。

 
> tail(x) 
      Composite Version     Partition Deployment.Date 
6 MaintenanceService 1.4.34.5 SpecialProgram-IneligibleCR  2014-10-01 
7 MaintenanceService 1.4.34.5 SpecialProgram-IneligibleCR  2014-10-01 
8   Integration 1.6.1   SpecialProgram-PT  2014-10-13 
9   Integration 1.6.1   SpecialProgram-PT  2014-10-13 
10 UpdateTermChanges 1.9.0     TermChange  2014-09-28 
11 UpdateTermChangesV2 1.13.0.1     TermChange  2014-09-24 


> x[ grep("2014-10", x$Deployment.Date) , ] 
        Composite Version     Partition Deployment.Date 
1 TermChangeEventProcessor 1.9.1.1     TermChange  2014-10-31 
2 TermChangeIntegrationLayer 1.1.2.1     TermChange  2014-10-31 
3    UpdateOffers 2.5.2     TermChange  2014-10-10 
4    UpdateOffers 2.5.3     TermChange  2014-10-13 
5   MaintenanceService 1.4.34.4 SpecialProgram-IneligibleCR  2014-10-01 
6   MaintenanceService 1.4.34.5 SpecialProgram-IneligibleCR  2014-10-01 
7   MaintenanceService 1.4.34.5 SpecialProgram-IneligibleCR  2014-10-01 
8    Integration 1.6.1   SpecialProgram-PT  2014-10-13 
9    Integration 1.6.1   SpecialProgram-PT  2014-10-13 


> x[(x$Partition == " TermChange"), ] 
        Composite Version Partition Deployment.Date 
1 TermChangeEventProcessor 1.9.1.1 TermChange  2014-10-31 
2 TermChangeIntegrationLayer 1.1.2.1 TermChange  2014-10-31 
3    UpdateOffers 2.5.2 TermChange  2014-10-10 
4    UpdateOffers 2.5.3 TermChange  2014-10-13 
10   UpdateTermChanges 1.9.0 TermChange  2014-09-28 
11  UpdateTermChangesV2 1.13.0.1 TermChange  2014-09-24 

但是，當我一起使用它們的結果不是我所期望的。

 
> x[((grep("2014-10", x$Deployment.Date)) & (x$Partition == " TermChange")), ] 
        Composite Version Partition Deployment.Date 
1 TermChangeEventProcessor 1.9.1.1 TermChange  2014-10-31 
2 TermChangeIntegrationLayer 1.1.2.1 TermChange  2014-10-31 
3    UpdateOffers 2.5.2 TermChange  2014-10-10 
4    UpdateOffers 2.5.3 TermChange  2014-10-13 
10   UpdateTermChanges 1.9.0 TermChange  2014-09-28 
11  UpdateTermChangesV2 1.13.0.1 TermChange  2014-09-24 
Warning message: 
In (grep("2014-10", x$Deployment.Date)) & (x$Partition == " TermChange") : 
    longer object length is not a multiple of shorter object length 

我玩過括號分組以及使用雙和號。我錯過了什麼，以便可以在2014-10年部署所有TermChange條目的子集？

謝謝。

Answer 1

我喜歡從dplyr包

library(dplyr) 
filter(x, grepl("2014-10",Deployment.Date) & Partition==" TermChange")) 

的filter功能（本地數據測試）

Answer 2

你已混合整數子集和邏輯子集。

> x <- 9:12 

> grep('1', x) 
[1] 2 3 4 

> x<11 
[1] TRUE TRUE FALSE FALSE 

> grep('1',x) & x<11 
[1] TRUE TRUE FALSE FALSE 
Warning message: 
In grep("1", x) & x < 11 : 
    longer object length is not a multiple of shorter object length 

> which(x<11) 
[1] 1 2 

> intersect(grep('1',x), which(x<11)) 
[1] 2 

> grepl('1',x) & x<11 
[1] FALSE TRUE FALSE FALSE