小编use*_*330的帖子

我正在尝试写一个for循环来重复(c)和(d)100次.我想在for循环的每次迭代中打印TRS-TRS0的估计值.它应该停止算法,如果它很小(比如1/10000).最后,我希望它创建一个图表,其中显示每个值.

我想我在这里拥有一切,但是当我运行它时,我看不到任何事情发生.我错过了什么吗？

for (i in 1:100){
  #c)
  fit1 = loess(res~x2, data=data.frame(res,x1,x2))
  f2=predict(fit1,newdata=data.frame(res,x1,x2))
  res=data$y-mean(data$y) -f2 
  #d)
  fit2 = loess(res~x1, data=data.frame(res,x1,x2))
  f1=predict(fit2,newdata=data.frame(res,x1,x2))
  res=data$y - mean(data$y)-f1

  TSR=sum((data$y-mean(data$y)-f1-f2)^2);TSR
  if (abs(TSR-TSR0) > delta) TSR0=TSR else break
  #continue 
  if (abs(TSR-TSR0) < delta) break
  TSR0=TSR
  val=TSR-TSR0;val
  x11(); plot(x1,f1); plot(x2,f2)
}

要重现,这里是创建的数据:

set.seed(3)
x1=runif(300);x2=runif(300)
error=rnorm(300,mean=0,sd=3)
z1=-2+3*x1; z2=2*sin(2*pi*x2) 
data=data.frame(x1,x2,y=z1+z2+error) 
#fit the model
TSR0=0
f10=0;f20=0
res=data$y-mean(data$y) -f10 -f20;
delta=.0001

我正在尝试使用 shell 命令从 R 运行简单的外部应用程序。

shell('"C:\\Program Files\\SomeApp\\bin\\Release\\SomeApp.exe" "C:\\Users\\SomeUser\\R_Scripts\\RProjects\\Rprojects\\" "1" "yes"')

如果我从命令行运行括号中的部分，它可以完美运行。但是如果我通过 R 的 shell 命令运行它，它会抛出一个错误：

'C:\Program' is not recognized as an internal or external command, operable program or batch file.
Warning messages:
1: running command 'C:\Windows\system32\cmd.exe /c "C:\Program Files\SomeApp\bin\Release\SomeApp.exe" "C:\Users\SomeUser\R_Scripts\RProjects\Rprojects\" "1" "yes"' had status 1 
2: In shell("\"C:\\Program Files\\SomeApp\\bin\\Release\\SomeApp.exe\" \"C:\\Users\\SomeUser\\R_Scripts\\RProjects\\Rprojects\\\" \"1\" \"yes\"") :
 '"C:\Program Files\SomeApp\bin\Release\SomeApp.exe" "C:\Users\SomeUser\R_Scripts\RProjects\Rprojects\" "1" "yes"' execution failed with error code 1

有没有其他人面临同样的问题？

退出 R Studio 时，通常会提示我Save workspace image to ~/.RData。我不小心点击Save了某个点，现在当我打开 R Studio 时，我的全局环境会自动加载多个函数和数据集。现在，当我启动 R Studio 时，我必须清除工作区中的所有对象。

如何删除自动加载保存数据的数据（或设置），以便启动时不加载数据？

新发布的 R 版本 4.2.0rgl在 RStudio 中加载包时会崩溃。我能做什么呢？

我想根据Watts-Strogatz模型的参数p绘制聚类系数和平均最短路径，如下所示：

这是我的代码：

library(igraph)
library(ggplot2)
library(reshape2)
library(pracma)
p <- #don't know how to generate this?
trans <- -1
path <- -1

for (i in p) {
  ws_graph <- watts.strogatz.game(1, 1000, 4, i)
  trans <-c(trans, transitivity(ws_graph, type = "undirected", vids = NULL,
               weights = NULL))
  path <- c(path,average.path.length(ws_graph))
}
#Remove auxiliar values
trans <- trans[-1]
path <- path[-1]
#Normalize them
trans <- trans/trans[1]
path <- path/path[1]

x = data.frame(v1 = p, v2 = path, v3 = trans)

plot(p,trans, ylim = c(0,1), ylab='coeff') …

我正在使用 R Studio 并创建一些向量并用它们进行一些计算。但是，当我执行代码时，unused argument出现错误。我该如何解决这个问题？

f <- c(2,4,6) 
v <- c(1,2,3,4,5)
cos(c(0, pi/4, pi/2, pi))

该rgl软件包是在R-forge上开发的,网址为https://r-forge.r-project.org/projects/rgl/.安装最新版本的最简单方法应该是

install.packages("rgl", repos="http://R-Forge.R-project.org")

但这经常失败,因为R-forge并不总是有当前版本.你怎么得到的呢？

我正在rmarkdown::render外面使用RStudio来编织.pdf文档.这工作正常,但它留下了.tex我不想要的中间文件.我已经在使用该clear = TRUE选项了rmarkdown::render.我不知道RStudio做了什么,但是.tex当我从IDE编写文档时它确实清除了文件.

运行下面的代码有时会失败并返回附加的错误消息。

webshot2::webshot(url = "~/a_web_page.html", file = "~/an_image.png")

Error in launch_chrome(path, args) : 
  Failed to start chrome. Error: [1208/102720.412050:ERROR:filesystem_posix.cc(63)] mkdir /tmp/Crashpad/new: Permission denied (13)
[1208/102720.412409:ERROR:socket.cc(120)] recvmsg: Connection reset by peer (104)

我想从给定的文本中提取日期，日期可以是任何格式 2018 年 4 月 10 日、10-04-2018、10/04/2018、2018/04/10、04.10.2018，就像其他格式一样......

我有新闻数据，想从文本中提取日期

例如：我的朋友将于 2018 年 7 月 10 日或 10/07/2018 来

我想从给定的文本中 提取日期

请帮忙

提前致谢