小编Bro*_*Vic的帖子

我想知道,如何在R中创建数字零长度向量？

我想在C++中实现一个大的int类作为编程练习 - 一个可以处理大于long int的数字的类.我知道已经有几个开源实现,但我想写自己的.我试图了解正确的方法是什么.

我知道一般策略是将数字作为字符串,然后将其分解为较小的数字(例如,单个数字),并将它们放在一个数组中.此时,实现各种比较运算符应该相对简单.我主要担心的是如何实现添加和乘法等功能.

我正在寻找一种通用的方法和建议,而不是实际的工作代码.

我正在尝试使用基于每周数据的R进行时间序列建模和预测,如下所示:

biz week     Amount        Count
2006-12-27   973710.7     816570
2007-01-03  4503493.2    3223259
2007-01-10  2593355.9    1659136
2007-01-17  2897670.9    2127792
2007-01-24  3590427.5    2919482
2007-01-31  3761025.7    2981363
2007-02-07  3550213.1    2773988
2007-02-14  3978005.1    3219907
2007-02-21  4020536.0    3027837
2007-02-28  4038007.9    3191570
2007-03-07  3504142.2    2816720
2007-03-14  3427323.1    2703761
...
2014-02-26  99999999.9   1234567

关于我的数据:如上所示,每周都标有一周的第一天(我的周从周三开始,到周二结束).当我构建我的ts对象时,我尝试了

ts <- ts(df, frequency=52, start=c(2007,1))

我遇到的问题是:

1)有些年份可能有53周,因此frequency=52这些年不适用;

2)我的开始周/日期是2006-12-27,我该如何设置启动参数？start=c(2006,52)或者start=c(2007,1)自2006-12-27周以来真的跨过年界？另外,对于建模,最好是拥有完整的年份数据(比如2007年我的开始年份,如果我只有部分年份的数据),最好不要使用2007,而是从2008年开始？那么2014年:既然还不是完整的一年,我应该使用我的建模吗？无论哪种方式,我仍然有一个问题,是否在2006-12-27这样的年份边界中包括那些周.我应该包括wk 12007年还是2006年的最后一周？

3)当我使用ts <- ts(df, frequency=52, start=c(2007,1)),然后打印出来,我得到了如下图所示的结果,这样反而2007.01,2007.02,2007.52 ...,我得到了2007.000,2007.019,...,它从获取1/52=0.019.这在数学上是正确的,但不容易解释.有没有办法将它标记为日期本身就像数据框或至少一样2007 wk1, 2007 wk2...

========= …

有没有人知道一个R函数能够检索自己的IP地址(你正在处理的PC)？这将是非常有帮助的!提前谢谢了.

在我的项目上工作了一段时间后,这个警告开始出现:

2>Game.cpp
2>c:\program files\microsoft sdks\windows\v6.0a\include\windef.h(126) : warning C4005: 'APIENTRY' : redefinición de macro
2>        c:\users\ferran\directo\gameprojects\dev-libs\glfw\include\glfw.h(72) : vea la definición anterior de 'APIENTRY'
2>c:\program files\microsoft sdks\windows\v6.0a\include\wingdi.h(23) : warning C4005: 'WINGDIAPI' : redefinición de macro
2>        c:\users\ferran\directo\gameprojects\dev-libs\glfw\include\glfw.h(88) : vea la definición anterior de 'WINGDIAPI'

我确定这是要解决的包含文件的顺序问题,因为这些文件都不是我的.我的问题是,是否存在一种通用的方法来防止这种情况或找到必须重新排序的文件以避免此消息.

这是我之前提出的这个问题 - Powershell:在目标系统上安装模块

• 什么是默认模块加载路径？现在经过这么多天,它已经开始发出这个错误(来自我的C#代码)
  
  Cannot find path 'C:\Users\angshuman\Documents\WindowsPowerShell\Modules\MyPSModules\MyPsModules.??psd1' because it does not exist.
  
  从SysWow64文件夹路径一直很好地加载
• 为什么它突然在用户文件夹而不是Windows文件夹中搜索？

我在Windows 7 64位操作系统上通过C#执行相同的代码

    _ps = PowerShell.Create();   
    _ps.AddScript("Import-Module MyPSModules -PassThru");
    Collection<PSObject> psObjects = _ps.Invoke();

我经常发现在命令行（Windows）上运行 R 更有用。然而，当我在 Powershell 中尝试它时，我往往会遇到问题，但通过先运行cmd然后运行就可以轻松克服这个问题。

这是我执行此操作时遇到的错误R CMD BATCH

Invoke-History: A positional parameter cannot be found that accepts the argument 'BATCH'

我后来意识到这r是一个返回刚刚过去的命令的别名，因此我无法运行 R。

随后，我发现使用可执行文件的完整文件名（即R.exe）或使用 Rcmd.exe （即Rcmd BATCH ...）是有效的。

但是，我只是好奇，如果遇到类似的冲突，是否有解决办法？

我迫切需要.我有一个语料库,我已经转换成一种共同的语言,但有些单词没有正确地转换成英语.因此,我的语料库有非ASCII字符,例如"(U + 00F8)".

我正在使用Quanteda并使用以下代码导入了我的文本:

 EUCorpus <- corpus(textfile(file="/Users/RiohBurke/Documents/RStudio/PROJECT/*.txt"), encodingFrom = "UTF-8-BOM")

我的语料库由166个文档组成.以这种方式将文档导入R中,对于我摆脱这些非ASCII字符的最佳方法是什么？

假设我要创建此编号列表：

1. jpg 750x1365小动物可爱卡通图片素材免费下载觅知网...
2. 手绘卡通可爱小动物素材图片免费下载高清psd千库网图片编号...
3. Neque Porro quisquam est，qui dolorem ipsum quia ...
4. 小学数学三年级上册期末试卷知乎...

在R Markdown中，文档建议在中断之后继续这样的列表，应该在每个列表项之前添加(@)以下内容：

(@) Sed ut perspiciatis unde omnis iste natus error...
(@) Nemo enim ipsam voluptatem quia voluptas sit...

 This is an interrupting block of text...

(@) Neque porro quisquam est, qui dolorem ipsum quia..
(@) Quis autem vel eum iure reprehenderit qui in ea voluptate...

并在中断后继续编号。

但是，我尝试使用这种方法来延续从R Markdown生成的ioslides演示文稿中的编号列表，但没有成功，即

(@) Nemo enim ipsam voluptatem quia voluptas sit...

 ***

(@) Neque porro quisquam est, …

我正在尝试使用 R 将表达式传递到 Quarto 中的 YAML 块标签。我知道如何对 R Markdown 中的 knit 块选项执行此操作（而且我也知道这在 Quarto 中效果很好）。但是，我想知道使用当前的标签习惯是否可以实现这一点。

例如，使用以下来源...

...我可以生成一些具有图形标题和交叉引用的输出。

需要明确的是，使用正常的块选项，我想使用第二个块，如下所示：

```{r}
#| label: fig-plot-cars
#| fig-cap = <cap>
#| echo: false
plot(cars)  
```

其中<cap>是之前创建的变量（或任何表达式），它返回图形标题的字符串。

我想从 中创建训练和测试数据mydata，其中有 2673 个观察值和 23 个变量。但是，我无法仅通过简单地减去训练数据来创建测试集。

dim(mydata)
## [1] 2673   23
set.seed(1)
train = mydata[sample(1:nrow(mydata), 1000, replace=FALSE), ]
dim(train)
## [1] 1000   23

当我运行以下命令时，我收到 19 个警告，结果有 20,062 个观察值：

test = mydata[!train, ]
## There were 19 warnings (use warnings() to see them)
dim(test)
## [1] 20062    23

我究竟做错了什么？

我在一个分支上工作，并且工作正常。完成一些工作后，当我键入git status时会发生这种情况：

mac-mini:production_designs jithinraj$ git status
error: bad signature
fatal: index file corrupt

现在我不能commit或不能在分支机构上做任何事情。在不丢失未提交数据的情况下有什么解决方案？