用逗号替换字符向量中的每个第 n 个字符

Question

例如，如果 n=5，我想要这个：

names:("Saint Denis";"Rhodes";"Strawberry";"Valentine";"Omar")

变成这样

"Sain, Den,s" "Rhod,s" "Stra,berr," "Vale,tine" "Omar"

我相信我必须使用 ssr 并迭代我的列表，所以像这样

{$[count x < 4;x;ssr[x;"????.";","]]} each names

有什么想法吗？

Answer 1

你可以这样做：

q){@[x;-1+5*1+til count[x]div 5;:;","]}each names
"Sain, Den,s"
"Rhod,s"
"Stra,berr,"
"Vale,tine"
"Omar"