我创建了一个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)
后一种尝试导致以下错误:
虽然我的同事能够加入应用程序,但它并没有像在我的机器上那样运行.谢谢您的帮助.
我在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)