如何在R的crayon包中使cat函数渲染字符串变量的样式效果

问题原因 #

你在Code_2里把style()函数的调用代码当成字符串赋值给了front_string（注：你原代码变量名拼写错误，应为front_string而非fornt_sting），此时变量存储的是纯文本内容，而非style()函数执行后带有颜色控制码的结果，所以cat只会原样输出这段文本，不会解析样式。

解决方案 #

方法一：直接存储函数执行结果（推荐） #

不要把函数调用写成字符串，直接执行style()并赋值：

library(crayon)
# 直接执行style函数，将结果赋值给变量
front_string <- style("I am pink, too!\n", "pink", bg = "bgCyan")
# 输出带样式的内容
cat(front_string)

方法二：动态解析字符串代码（适合动态生成代码场景） #

如果你的字符串是动态生成的，必须从字符串执行代码，可以用eval(parse(text=...))解析并执行字符串中的代码：

library(crayon)
front_string <- 'style("I am pink, too!\n", "pink", bg = "bgCyan")'
# 解析字符串中的代码并执行，再输出结果
cat(eval(parse(text = front_string)))

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