Tag: r

包含不在Rpresentation Markdown中运行的代码

我在RStudio中有一个.Rpres文件。 我想包括代码,但没有运行(我只是显示代码来解释它是如何工作的)。 是否有可能做到这一点(并确保它不会产生错误,因为它没有运行)?

gc()和rm()之间的区别是什么

我正在使用调用rm(list=ls())来定期清理R中的内存。 之后我需要调用垃圾回收器gc()吗? 这两个函数有什么区别? gc()对某些variables调用rm()吗?

testing一个函数的参数是否设置在R中

我有一个函数f ,需要两个参数( p1和p2 ): 如果对于参数p2没有值传递给函数,则应该使用p1 ^ 2的值。 但是如何在函数内find值,是否给出了值。 问题是,如果没有值,variablesp2不会被初始化。 因此我无法testingp2是否为NULL 。 f <- function(p1, p2) { if(is.null(p2)) { p2=p1^2 } p1-p2 } 是否有可能检查p2的值是否传递给函数? (我找不到一个isset()函数或类似的东西。)

ggplot geom_text字体大小控制

我试图通过做这样的事情来改变我的酒吧在ggplot2的标签的字体为10: ggplot(data=file,aes(x=V1,y=V3,fill=V2)) + geom_bar(stat="identity",position="dodge",colour="white") + geom_text(aes(label=V2),position=position_dodge(width=0.9), hjust=1.5,colour="white") + theme_bw()+theme(element_text(size=10)) ggsave(filename="barplot.pdf",width=4,height=4) 但是由此产生的图像的条形图标签具有超大的字体大小。 然后我想用geom_text()修改: geom_text(size=10,aes(label=V2),position=position_dodge(width=0.9), hjust=1.5,colour="white") 标签字体甚至更大… 我可以将geom_text的大小更改为3,现在看起来像字体10,类似于轴标签。 我想知道发生了什么事? theme(text=element_text(size=10))是否不适用于标签? 为什么geom_text()的10的大小与theme(text=element_text()) ?

可以打印超过100行的data.table?

data.table有一个很好的function,可以抑制输出到表头和尾部。 是否可以一次查看/打印100多行? library(data.table) ## Convert the ubiquitous "iris" data to a data.table dtIris = as.data.table(iris) ## Printing 100 rows is possible dtIris[1:100, ] ## Printing 101 rows is truncated dtIris[1:101, ] 我经常有data.table结果有点大(如200行),我只是想查看。

为输出添加逗号

我通过xtable输出一个数据xtable到html。 我想在表格的几列添加逗号。 我想我做我自己的粘贴黑客我会检查是否有内置的方式来做到这一点。

在R 中错误时跳到循环的下一个值

我已经阅读了几个关于tryCatch和cuzzins的SO问题以及文档: R中的exception处理 捕获一个错误,然后分支逻辑 如何检查函数调用是否导致警告? 循环中的情节问题 但我还是不明白。 我正在运行一个循环,并且如果发生几种错误中的任何一种,就想跳到next一个循环: for (i in 1:39487) { #ERROR HANDLING this.could.go.wrong <- tryCatch( attemptsomething(), error=function(e) next ) so.could.this <- tryCatch( doesthisfail(), error=function(e) next ) catch.all.errors <- function() { this.could.go.wrong; so.could.this; } catch.all.errors; #REAL WORK useful(i); fun(i); good(i); } #end for (顺便说一句, next我没有find任何文档) 当我运行这个, R hon: Error in value[[3L]](cond) : no loop […]

在两个date之间创build一个所有天的向量

在R中有一个简单的方法可以列出两个指定date之间发生的所有有效date吗? 例如,我想要以下input: itemizeDates(startDate="12-30-11", endDate="1-4-12") 为了生成以下date: "12-30-11" "12-31-11", "1-1-12", "1-2-12", "1-3-12", "1-4-12" 我在date的类和格式上很灵活,我只需要实现这个概念。

返回向量中最小值的索引?

a <- c(1, 2, 0, 3, 7) 我正在寻找一个函数来返回最小值的索引,3.这是什么?

我可以在R中使用一个列表作为散列吗? 如果是这样,为什么这么慢?

在使用R之前,我使用了相当多的Perl。 在Perl中,我经常使用哈希函数,在Perl中查找哈希函数通常被认为是快速的。 例如,下面的代码将使用多达10000个键/值对来填充散列,其中键是随机字母,值是随机整数。 然后,它在该散列中进行10000次随机查找。 #!/usr/bin/perl -w use strict; my @letters = ('a'..'z'); print @letters . "\n"; my %testHash; for(my $i = 0; $i < 10000; $i++) { my $r1 = int(rand(26)); my $r2 = int(rand(26)); my $r3 = int(rand(26)); my $key = $letters[$r1] . $letters[$r2] . $letters[$r3]; my $value = int(rand(1000)); $testHash{$key} = $value; } […]