我想将一个长字符串打印到RStudio控制台,以便它不会被截断.
> paste(1:300, letters, collapse=" ")
[1] "1 a 2 b 3 c 4 d 5 e 6 f 7 g 8 h 9 i
...
181 y 182 z 183 a 184 b... <truncated>
Run Code Online (Sandbox Code Playgroud)
我认为这应该相当简单,但我无法弄清楚如何.我试过了
options(max.print = 10000)
Run Code Online (Sandbox Code Playgroud)
并查看了print帮助页面上的args .仍然没有运气.
我必须更改哪些参数/设置才能实现此目的?
我想创建一个输入文件对话框.这很简单,使用该fileInput功能.
shinyUI(pageWithSidebar(
headerPanel(""),
sidebarPanel(
fileInput("file", "Select a file")
),
mainPanel()
))
Run Code Online (Sandbox Code Playgroud)

上传后,它看起来像这样:

现在,我想将inputFile元素重置为上传前的状态.由于没有像updateFileInput我这样的JS/HTML菜鸟这样的功能,我无法弄清楚我是如何实现这一目标的.输出的代码fileInput("file", "Select a file")如下.
<label>Select a file</label>
<input id="file" type="file" accept="text/plain"/>
<div id="file_progress" class="progress progress-striped active shiny-file-input-progress">
<div class="bar"></div>
<label></label>
</div>
Run Code Online (Sandbox Code Playgroud)
有任何想法吗?
PS.我不想在renderUI这里使用反应来重新渲染文件输入元素.我宁愿去'更新方式'(如果有这样的事情)......
当我查看R函数时,我经常会发现以下结构:
f <- function(exp=T) {
if (exp)
a <- 1
else
a <- 2
}
f()
f(F)
Run Code Online (Sandbox Code Playgroud)
这将运行没有错误.但是执行内部函数代码会引发错误,因为R可能假定语句在第一次赋值后完成,a <- 1并且无法处理以下其他内容.
exp=T
if (exp)
a <- 1
else
a <- 2
Run Code Online (Sandbox Code Playgroud)
现在,这对我来说很有意义,但我仍然想了解为什么执行代码的行为在函数内部或外部执行时会有所不同.
我正在执行以下操作以导入一些txt表并将它们保存为列表:
# set working directory - the folder where all selection tables are stored
hypo_selections<-list.files() # change object name according to each species
hypo_list<-lapply(hypo_selections,read.table,sep="\t",header=T) # change object name according to each species
Run Code Online (Sandbox Code Playgroud)
我想访问一个特定的元素,比如说hypo_list [1].由于每个元素代表一个表,我应该如何获取访问特定单元格(行和列)?
我想做类似的事情:
a<-hypo_list[1]
a[1,2]
Run Code Online (Sandbox Code Playgroud)
但是我收到以下错误消息:
Error in a[1, 2] : incorrect number of dimensions
Run Code Online (Sandbox Code Playgroud)
有一个聪明的方法吗?
提前致谢!
下面我发布了一个迷你示例,其中我想“[“为S4类的方法编写文档.有人知道如何正确记录"["使用roxygen和S4 的通用方法吗?
在建造后检查包装时我收到警告(见下文).
#' An S4 class that stores a string.
#' @slot a contains a string
#' @export
setClass("testClass",
representation(a="character"))
#' extract method for testClass
#'
#' @docType methods
#' @rdname extract-methods
setMethod("[", signature(x = "testClass", i = "ANY", j="ANY"),
function (x, i, j, ..., drop){
print("void function")
}
)
Run Code Online (Sandbox Code Playgroud)
包检查摘录:
* checking for missing documentation entries ... WARNING
Undocumented S4 methods:
generic '[' and siglist 'testClass'
All user-level objects in a package (including S4 …Run Code Online (Sandbox Code Playgroud) 我想将包含base64编码图像的HTML文件转换为DOCX.当我使用pandoc执行此操作时,不会转换base64图像.
是否可以使用pandoc包含base64图像?
我想生成一个二维颜色渐变矩形,如右下图所示.我怎么能在R中这样做?使用colorRamp或RColorBrewer或其他功能/包我可以生产漂亮的1D dolor坡道.但是我如何为2D做这个,包括角落里的几种颜色,比如右上方的矩形?

我想得到的是例如以下两种渐变类型:

BTY:我完全忘了提到我在这里找到了上面的图表(由Luca Fenu制作).
在 RStudio 中,我使用标签####来构建代码并拥有整洁的代码大纲(见下文)。但是,我希望函数(foo等)有时不会在大纲中显示,因为它常常使结构过于混乱和凌乱(红色箭头),特别是当文件很大并且包含许多函数定义时。
有没有办法抑制(或切换)显示代码大纲中的函数?
..或者设置函数条目的缩进级别,以便它们在代码大纲中变得不那么突出?
当重新使用包含绘图的块时,绘图没有被正确引用,即它们对于两个块都是相同的,尽管它们应该是不同的.我能做些什么呢?
## Test
```{r}
col <- "black"
```
```{r chunk1}
plot(0, col=col)
```
```{r}
col <- "red"
```
```{r chunk1}
```
Run Code Online (Sandbox Code Playgroud)