文字列のリスト内のchr（0）エントリを表示して削除します

Question

私はRの文字列のベクトルを持っていますが、そのインデックスの一部はchr（0）です。私はchr（0）であるそれらのインデックスを印刷し、それらを削除したいと思います。私は2つのタスクのいずれかを行うことができません。私は最初のシナリオのために試してみました何3種類のソリューションです：TEMPの値はCHRを削除するには

> temp2 
integer(0) 

であることが判明したすべての場合において

(1) temp <- keepColumns[keepColumns == character(0)] 
(2) temp2 <- which(keepColumns[]== "0") 
(3) temp2 <- foreach(i=1:length(keepColumns)) %do% if (length(keepColumns[i]) == 0) print("Empty") 
#if (identical(keepColumns[i],character(0))) { print(i) } 

、（0）、私は同様のソリューションを試してみました：

keepColumnsList = keepColumns[!identical(keepColumns, character(0))] 

ただし、keepColumnsListは元のベクターと同じです。次のように

リストである：

> keepColumns 
[[1]] 

> keepColumns 
[[1]] 
[1] "P2.11FIC2026_PV" 

[[2]] 
[1] "P2.11FIC2046D_PV" 

[[3]] 
[1] "P2.11FI2046" 

[[4]] 
[1] "P2.11FY2048I" 

[[5]] 
[1] "P2.11FIC2030_PV" 

[[6]] 
[1] "P2.11FIC2011A_PV" 

[[7]] 
[1] "P2.11FIC2017_OP" 

[[8]] 
[1] "P2.11HIC5001" 

[[9]] 
[1] "P2.11HIC5002" 

[[10]] 
[1] "P2.11HIC5003" 

[[11]] 
[1] "P2.11PI5014" 

[[12]] 
[1] "P2.11TIC5003_PV" 

[[13]] 
[1] "P2.11TIC5011_PV" 

[[14]] 
[1] "P2.11FIC5011_PV" 

[[15]] 
character(0) 

[[16]] 
[1] "P2.11TI5001" 

[[17]] 
[1] "P2.11PIC2031_PV" 

[[18]] 
[1] "P2.11PIC2045_PV" 

[[19]] 
[1] "P2.11HIC2026E" 

[[20]] 
[1] "P2.11AI2001A1" 

[[21]] 
[1] "P2.11AI2001A7" 

[[22]] 
[1] "P2.11FI2029" 

[[23]] 
[1] "P2.11AI2026" 

[[24]] 
[1] "P2.11AI2001A8" 

[[25]] 
[1] "P2.11TI2076" 

[[26]] 
[1] "P2.11TI2068" 

[[27]] 
[1] "P2.11TI2027" 

[[28]] 
[1] "P2.11TI2071" 

[[29]] 
[1] "P2.11AI2001G6" 

[[30]] 
[1] "P2.11TI2047" 

[[31]] 
[1] "P2.11AI2001G1" 

[[32]] 
[1] "P2.11AI2001G2" 

[[33]] 
[1] "P2.11AI2001G3" 

[[34]] 
[1] "P2.11AI2001G4" 

[[35]] 
[1] "P2.11AI2001G5" 

[[36]] 
[1] "P2.11AI2001H5" 

[[37]] 
[1] "P2.11FI5001" 

[[38]] 
[1] "P2.11FI5021" 

[[39]] 
[1] "P2.11FI5023" 

[[40]] 
[1] "P2.11PI5004" 

[[41]] 
[1] "P2.11TI5009" 

[[42]] 
[1] "P2.11TI5010" 

[[43]] 
[1] "P2.11TI5026" 

[[44]] 
[1] "P2.11TI5034" 

[[45]] 
[1] "P2.11TI5036" 

[[46]] 
[1] "P2.11TI5038" 

[[47]] 
[1] "P2.11TI5045" 

[[48]] 
[1] "P2.11FI2001A" 

[[49]] 
[1] "P2.11FI2001B" 

[[50]] 
character(0) 

[[51]] 
character(0) 

[[52]] 
[1] "P2.11TI2061" 

[[53]] 
[1] "P2.11TI2062" 

[[54]] 
[1] "P2.11TI2063" 

[[55]] 
[1] "P2.11TI2064" 

[[56]] 
[1] "P2.11TI2065" 

[[57]] 
[1] "P2.11TI2066" 

Answer 1

これはCHRでエントリを削除して動作（0）値：

Filter(function(x) length(x)==0, keepColumns) 

chr(0)値はリストのインデックスを表示します、以下は動作するはずです：

Filter(function(x) length(keepColumns[[x]])==0, seq_along(keepColumns)) 

しかし、まだ表示のための無ソリューションをベクトル のすべてのchr（0）エントリのインデックス番号。