as.character(解析(text=";A\";)并保留文字引号(仅以R为底)
我想快速整理R代码并保留任何文字引号(如果存在)。我尝试将as.character(解析(text=";A\";)并保留文字引号(仅以R为底),r,R,我想快速整理R代码并保留任何文字引号(如果存在)。我尝试将作为.character(解析(text=“\'A\”\35;删除此注释”),但返回的是“A”,而不是所需的“\'A\”。我知道formator::tidy_source(),但我想知道在base R中是否有一个巧妙的解决方案。试试x这是一个非常简单的例子,但在实际用例中,文本/代码是任意的,我无法控制它的引用方式。粘贴(扫描(text=“\”a\”\35;删除此注释“,what=character(),comment.char='#',
作为.character(解析(text=“\'A\”\35;删除此注释”)
,但返回的是“A”
,而不是所需的“\'A\”
。我知道formator::tidy_source()
,但我想知道在base R中是否有一个巧妙的解决方案。试试x这是一个非常简单的例子,但在实际用例中,文本/代码是任意的,我无法控制它的引用方式。粘贴(扫描(text=“\”a\”\35;删除此注释“,what=character(),comment.char='#',quote=NULL),collapse='')
x