小编use*_*730的帖子

RShiny - 如何在网络中共享应用程序

我创建了一个R Shiny应用程序,我想在我的网络中与我的同事分享.我尝试在我的计算机上托管应用程序,以便网络中的其他用户可以访问它并将其与数据文件一起使用.

我试过了:

    runApp("appname",host="0.0.0.0",port=3986)
Run Code Online (Sandbox Code Playgroud)

并且:

    runApp("appname",host="DNSMachinename")
Run Code Online (Sandbox Code Playgroud)

后一种尝试导致以下错误:

虽然我的同事能够加入应用程序,但它并没有像在我的机器上那样运行.谢谢您的帮助.

intranet r shiny

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

R:循环处理大块数据集(GB)?

我在GB中有一个大型数据集,在分析它之前我必须处理它.我尝试创建一个连接器,它允许我循环遍历大型数据集并一次提取块.这使我可以隔离满足某些条件的数据.

我的问题是我无法为规定它为null的连接器创建一个指示器,并在达到数据集的末尾时执行close(连接器).此外,对于第一块提取数据,我必须跳过17行,因为该文件包含R无法读取的标题.

有效的手动尝试:

filename="nameoffile.txt"    
con<<-file(description=filename,open="r")    
data<-read.table(con,nrows=1000,skip=17,header=FALSE)    
data<-read.table(con,nrows=1000,skip=0,header=FALSE)    
.    
.    
.    
till end of dataset
Run Code Online (Sandbox Code Playgroud)

因为我想要避免手动键入上述命令,直到我到达数据集的末尾,我试图编写一个循环来自动化该过程,但这是不成功的.

我尝试使用失败的循环:

filename="nameoffile.txt"    
con<<-file(description=filename,open="r")    
data<-read.table(con,nrows=1000,skip=17,header=FALSE)        
if (nrow(rval)==0) {    
  con <<-NULL    
  close(con)    
  }else{    
    if(nrow(rval)!=0){    
    con <<-file(description=filename, open="r")    
    data<-read.table(conn,nrows=1000,skip=0,header=FALSE)      
  }}    
Run Code Online (Sandbox Code Playgroud)

r connector chunks large-files

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

标签 统计

r ×2

chunks ×1

connector ×1

intranet ×1

large-files ×1

shiny ×1