的R - 系統與多個管道命令不返回標準輸出

Question

慶典：

ps -aux | grep -E "^.*\b[^grep](python).*(runserver).*$" 2>/dev/null | tr -s " " | cut -d " " -f 2 

它返回正確的結果。 （例如）

1450 
1452 

在R此相同的代碼

vLog <- system('ps -aux | grep -E "^.*\b[^grep](python).*(runserver).*$" 2>/dev/null | tr -s " " | cut -d " " -f 2', intern = TRUE) 

回報character(0)

Answer 1

只需更換\b與\\b也知道[^grep]它匹配任何字符，但不是g或r或e或p。

vLog <- system('ps -aux | grep -E "^.*\\b[^grep](python).*(runserver).*$" 2>/dev/null | tr -s " " | cut -d " " -f 2', intern = TRUE) 

實施例：

> system('ps -aux | grep -E "^.*\\bpython" 2>/dev/null | tr -s " " | cut -d " " -f 2', intern = TRUE) 
[1] "2519" "2526" "3285" "3291" 
> system('ps -aux | grep -E "^.*\bpython" 2>/dev/null | tr -s " " | cut -d " " -f 2', intern = TRUE) 
character(0)