小编nas*_*ddd的帖子

在R中是否有用于对象关系映射的包?

(通过对象关系映射,我的意思是这里描述的内容:维基百科:对象关系映射.)

以下是我在R中想象这项工作的方式:一种"虚拟数据框架"链接到数据库,并在访问时返回SQL查询的结果.例如,head(virtual_list)实际上会返回(select * from mapped_table limit 5)映射数据库的结果.

我在John Myles White找到了这篇文章,但在过去的3年中似乎没有任何进展.

是否有实现此功能的工作包?

如果不,

  1. 它会有用吗?
  2. 实施它的最佳方法是什么(S4?)?

orm r rmysql dplyr

18
推荐指数
2
解决办法
3596
查看次数

使用R中的data.table快速合并(...,all = TRUE)

是否可以使用data.table语法(如X [Y])等效合并(...,all = TRUE)?

具体来说,我需要一种非常快速的方法来获得结果:

item_length = data.table(index = 1:10, length =  c(2,5,4,6,3),key ="index")
item_weigth = data.table(index = c(2,4,6,7,8,11), weight= c(.3,.5,.2), key = "index")
merge(x2,y2, all=TRUE)
Run Code Online (Sandbox Code Playgroud)

这是:

> merge(item_length ,item_weigth , all=TRUE)
      index length weight
[1,]     1      2     NA
[2,]     2      5    0.3
[3,]     3      4     NA
[4,]     4      6    0.5
[5,]     5      3     NA
[6,]     6      2    0.2
[7,]     7      5    0.3
[8,]     8      4    0.5
[9,]     9      6     NA
[10,]    10      3     NA
[11,]    11     NA    0.2
Run Code Online (Sandbox Code Playgroud)

r data.table

12
推荐指数
1
解决办法
2911
查看次数

是否有 R 命令可以触发从 Rstudio Server 下载文件?

使用 Rstudio Server 时,可以非常轻松地通过“文件”>“更多”>“导出...”从服务器下载文件。Web 浏览器将自动开始下载。

有没有办法使用 R 命令生成此下载?

r rstudio rstudio-server

6
推荐指数
1
解决办法
2955
查看次数

使用sqldf将巨大的csv文件读入R中,但是sqlite文件需要两倍的空间,需要"吸尘"

阅读时,我发现读取大于内存的csv文件的最佳方法是read.csv.sql从包中使用sqldf.该函数将数据直接读入sqlite数据库,从而执行sql语句.

我注意到以下内容:似乎读入sqlite的数据存储在一个临时表中,因此为了使其可供以后使用,需要在sql语句中这样询问.

作为示例,以下代码将一些示例数据读入sqlite:

# generate sample data
sample_data <- data.frame(col1 = sample(letters, 100000, TRUE), col2 = rnorm(100000))
# save as csv
write.csv(sample_data, "sample_data.csv", row.names = FALSE)
# create a sample sqlite database
library(sqldf)
sqldf("attach sample_db as new") 
# read the csv into the database and create a table with its content
read.csv.sql("sample_data.csv", sql = "create table data as select * from file", 
             dbname = "sample_db", header = T, row.names = F, sep = ",")
Run Code Online (Sandbox Code Playgroud)

然后可以使用访问数据sqldf("select …

sqlite r sqldf

6
推荐指数
1
解决办法
4570
查看次数

如何在HTML knitr文档的头部添加javascript?

我使用Knitr的Rmd版本,因为它比Rhtml更简洁.我现在正在做

<script src="http://d3js.org/d3.v2.min.js"></script>
Run Code Online (Sandbox Code Playgroud)

在Rmd文档的主体中,但这应该是由生成的下游HTML文档的头部markdownToHTML.可能吗?

html markdown r knitr

6
推荐指数
1
解决办法
2473
查看次数

R中的相关矩阵的绘图,如Excel示例中所示

我一直在尝试最大限度地减少使用Excel而使用R,但在显示简单数据单元时,我仍然坚持使用,这是分析的最后一步.以下示例是我想破解的示例,因为它可以帮助我切换到R,用于我工作流程的这个关键部分.

我想在R中说明以下相关矩阵:

matrix_values <- c(
  NA,1.54,1.63,1.15,0.75,0.78,1.04,1.2,0.94,0.89,
  17.95,1.54,NA,1.92,1.03,0.78,0.89,0.97,0.86,1.27,
  0.95,25.26,1.63,1.92,NA,0.75,0.64,0.61,0.9,0.88,
  1.18,0.74,15.01,1.15,1.03,0.75,NA,1.09,1.03,0.93,
  0.93,0.92,0.86,23.84,0.75,0.78,0.64,1.09,NA,1.2,
  1.01,0.85,0.9,0.88,30.4,0.78,0.89,0.61,1.03,1.2,
  NA,1.17,0.86,0.95,1.02,17.64,1.04,0.97,0.9,0.93,
  1.01,1.17,NA,0.94,1.09,0.93,17.22,1.2,0.86,0.88,
  0.93,0.85,0.86,0.94,NA,0.95,0.96,24.01,0.94,1.27,
  1.18,0.92,0.9,0.95,1.09,0.95,NA,1.25,21.19,0.89,
  0.95,0.74,0.86,0.88,1.02,0.93,0.96,1.25,NA,18.14)
cor_matrix <- matrix(matrix_values, ncol = 10, nrow = 11)

item_names <- c('Item1','Item2','Item3','Item4','Item5',
                'Item6','Item7','Item8','Item9','Item10')
colnames(cor_matrix) <- item_names
rownames(cor_matrix) <- c(item_names, "Size")
Run Code Online (Sandbox Code Playgroud)

细胞应根据其等级进行着色(例如,> 95百分位数是完全绿色,<5百分位数是完全红色).最后一行应该用水平条表示(表示最大值的分数).

我在Excel中创建了我想要的输出: 相关矩阵

理想情况下,我还想强调相关组(手动或脚本),如下图所示: 相关矩阵与亮点

plot r

5
推荐指数
3
解决办法
5395
查看次数

有没有办法读取.RDS文件的内容而不将其全部加载到内存中?

我有一个包含许多列表的.RDS文件,它是从一台计算机创建的,该计算机的内存大于我尝试读取相同数据的内存.

有没有办法访问此内容而不将其全部加载到内存中?

这是一个例子:

listOflists <- list(list1 = list(rnorm(1000)),
                    list2 = list(rnorm(1000)))
saveRDS(listOflists, "listOflists.RDS")
Run Code Online (Sandbox Code Playgroud)

是否可以只读取list1而不加载整个文件?

r

5
推荐指数
0
解决办法
125
查看次数

用另一个重复的字符替换重复字符

我想用连续的1替换一个字符串中的3个或更多个连续的0.示例:'1001000001'变为'1001111111'.

在R中,我写了以下代码:

gsub("0{3,}","1",reporting_line_string)
Run Code Online (Sandbox Code Playgroud)

但显然它会将5 0替换为1 1.如何获得5 1?

谢谢,

regex r

4
推荐指数
1
解决办法
365
查看次数

R中的ff包:如何将数据从一个驱动器移动到另一个驱动器,并更改文件名

我正在与令人惊叹的ff和ffbase包密切合作.由于一些技术细节,我必须使用我的R会话在我的C:驱动器中工作.完成后,我将生成的文件移动到我的P:驱动器(在Windows中使用剪切/粘贴,而不是使用ff).

问题是当我加载ffdf对象时:

load.ffdf("data") 
Run Code Online (Sandbox Code Playgroud)

我收到错误:

Error: file.access(filename, 0) == 0 is not TRUE
Run Code Online (Sandbox Code Playgroud)

这没关系,因为没有人告诉ffdf对象它被移动了,但是尝试:

filename(data$x) <- "path/data_ff/x.ff"
Run Code Online (Sandbox Code Playgroud)

要么

pattern(data) <- "./data_ff/"
Run Code Online (Sandbox Code Playgroud)

没有帮助,给出错误:

Error in `filename<-.ff`(`*tmp*`, value = filename) : 
ff file rename from 'C:/DATA/data_ff/id.ff' to 'P:/DATA_C/data_ff/e84282d4fb8.ff' failed. 
Run Code Online (Sandbox Code Playgroud)

有没有办法"改变"到ffdf对象文件新位置的路径?谢谢 !!

r ff

3
推荐指数
1
解决办法
1687
查看次数

在闪亮的情况下,是否可以在服务器中获取ui元素的大小?

我正在构建一个有光泽的应用程序,它生成一个自定义的svg文件.在这样做的时候,我想让分辨率适应ui的元素(在我的情况下,来自shinydashboard的一个盒子)它将被放入.

我的代码在server.R中是否有办法查询ui中框的大小(以像素为单位)?

我会想象:ui$mybox$heightui$mybox$width

r shiny

1
推荐指数
1
解决办法
973
查看次数

标签 统计

r ×10

data.table ×1

dplyr ×1

ff ×1

html ×1

knitr ×1

markdown ×1

orm ×1

plot ×1

regex ×1

rmysql ×1

rstudio ×1

rstudio-server ×1

shiny ×1

sqldf ×1

sqlite ×1