在每個逗號出現之前，文本輸出以新行開始

我想要以這樣的方式得到輸出，即新行應該在製表符縮進之後的每個逗號之前開始。在每個逗號出現之前，文本輸出以新行開始

所需的輸出

function (formula 
    , data 
    , subset)

從function (formula, data, subset)。我的MWE是

Txt <- "function (formula, data, subset)" 
gsub(pattern=",", replacement=",\n\tab", x=Txt)

任何幫助將不勝感激。謝謝

2014-01-24 MYaseen208

九秒太晚了，我的生活的故事。也請注意標籤分隔符是'\ t'不'\ tab' – rawr

@rawr大家都知道的感覺，信任我;-) – Andrie

您的正則表達式模式幾乎是正確的，您只需要一個製表符的神奇咒語，即\t。

試試這個：

cat(gsub(pattern=",", replacement="\n\t,", x=Txt)) 

function (formula 
    , data 
    , subset)

2014-01-24 15:02:41 Andrie

（+1）：非常感謝@Andrie的回答。我怎樣才能使用這個命令來得到像這樣的R函數的參數：'cat（gsub（pattern =「，」，replacement =「\ n \ t，」，x = args（lm）））''。 – MYaseen208

@ MYaseen208改爲使用'formals（lm）'。 – Andrie

'formals（lm）'也不能按要求工作。但是這非常接近所需的輸出'cat（gsub（pattern =「，」，replacement =「\ n \ t，」，x = formatR ::: usage（lm）））''。 – MYaseen208

回答