[Update] อ้างอิงจากความคิดเห็น
# An empty function for Comments
Comment <- function(`@Comments`) {invisible()}
#### Comments ####
Comment( `
# Put anything in here except back-ticks.
api_idea <- function() {
return TRUE
}
# Just to show api_idea isn't really there...
print( api_idea )
`)
####
#### Code. ####
foo <- function() {
print( "The above did not evaluate!")
}
foo()
[คำตอบเดิม]
นี่เป็นอีกวิธีหนึ่ง ... ดูรูปด้านล่าง ตัดและวางโค้ดบล็อคลงใน RStudio
ความคิดเห็นหลายบรรทัดที่ทำให้การใช้ IDE มีประสิทธิภาพมากขึ้นคือ "สิ่งที่ดี" IDE หรือบรรณาธิการทั่วไปส่วนใหญ่ไม่มีการเน้นข้อความภายในบล็อกที่แสดงความคิดเห็นอย่างง่าย แม้ว่าผู้เขียนบางคนจะใช้เวลาในการตรวจสอบการแยกวิเคราะห์ภายในสตริงที่นี่ ด้วย R เราไม่มีความคิดเห็นแบบหลายบรรทัดหรือสตริงที่นี่เช่นกัน แต่การใช้นิพจน์ที่มองไม่เห็นใน RStudio ให้ความดีทั้งหมดนั้น
ตราบเท่าที่ไม่มี backticks ใด ๆ ในส่วนที่ต้องการใช้สำหรับความคิดเห็นหลายบรรทัดสตริงที่นี่หรือบล็อกความคิดเห็นที่ไม่ได้ดำเนินการนี่อาจเป็นสิ่งที่คุ้มค่าในขณะนี้
#### Intro Notes & Comments ####
invisible( expression( `
{ <= put the brace here to reset the auto indenting...
Base <- function()
{ <^~~~~~~~~~~~~~~~ Use the function as a header and nesting marker for the comments
that show up in the jump-menu.
--->8---
}
External <- function()
{
If we used a function similar to:
api_idea <- function() {
some_api_example <- function( nested ) {
stopifnot( some required check here )
}
print("Cut and paste this into RStudio to see the code-chunk quick-jump structure.")
return converted object
}
#### Code. ####
^~~~~~~~~~~~~~~~~~~~~~~~~~ <= Notice that this comment section isnt in the jump menu!
Putting an apostrophe in isn't causes RStudio to parse as text
and needs to be matched prior to nested structure working again.
api_idea2 <- function() {
} # That isn't in the jump-menu, but the one below is...
api_idea3 <- function() {
}
}
# Just to show api_idea isn't really there...
print( api_idea )
}`) )
####
#### Code. ####
foo <- function() {
print( "The above did not evaluate and cause an error!")
}
foo()
## [1] "The above did not evaluate and cause an error!"
และนี่คือรูป ...
