[更新] コメントに基づきます。
# 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 で目に見えない式を使用すると、すべてのメリットが得られます。
複数行のコメント、ヒア文字列、または実行されていないコメント ブロックに使用するセクションにバッククォートがない限り、これは価値のあるものになる可能性があります。
#### 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!"
そして、これが写真です...