如何用cat和paste实现指定格式输出？输出顺序反转问题求助

问题出在你混用了cat()和paste()的逻辑：cat()会直接打印内容，并且返回NULL，所以你写的paste(cat("Non-prime numbers :",IfNonPrime()," "))会先执行cat输出IfNonPrime()的结果，再把NULL和其他内容拼接，自然顺序颠倒。

正确写法1：直接用cat按顺序输出 #

不需要嵌套paste，直接把标题和函数返回值作为参数传给cat，按顺序排列：

cat("Prime numbers :", IfPrime(), "\n")
cat("Non-prime numbers :", IfNonPrime(), "\n")

正确写法2：先拼接字符串再打印 #

如果需要先把内容整合成字符串再输出，可以用paste先组合，再传给cat：

prime_str <- paste("Prime numbers :", paste(IfPrime(), collapse = " "))
non_prime_str <- paste("Non-prime numbers :", paste(IfNonPrime(), collapse = "  "))
cat(prime_str, "\n", non_prime_str, "\n", sep = "")

（如果IfNonPrime()返回的是带因子分解格式的元素，比如已经包含[3 199]这种形式，直接用paste(IfNonPrime(), collapse = " ")可以保留空格分隔的格式）

这样就能得到你期望的输出顺序：

Prime numbers : 89 107 
Non-prime numbers : 597 [3 199]  931 [7 7 19] 1083 [3 19 19] 

内容的提问来源于stack exchange，提问作者gazel alaryan