我正在尝试生成低于10亿的素数列表.我正在尝试这个,但这种结构非常糟糕.有什么建议？
a <- 1:1000000000
d <- 0
b <- for (i in a) {for (j in 1:i) {if (i %% j !=0) {d <- c(d,i)}}}
我有一个大约1000个单整数的列表.我需要能够进行一些数学计算,但它们会被列入列表或字符形式.如何切换它们以便它们可用？
样本数据:
> y [[1]]
[1] "7" "3" "1" "6" "7" "1" "7" "6" "5" "3" "1" "3" "3" "0" "6" "2" "4" "9"
[19] "1" "9" "2" "2" "5" "1" "1" "9" "6" "7" "4" "4" "2" "6" "5" "7" "4" "7"
[37] "4" "2" "3" "5" "5" "3" "4" "9" "1" "9" "4" "9" "3" "4" "9" "6" "9" "8"
[55] "3" "5" "2" "0" "3" "1" "2" "7" "7" "4" "5" "0" "6" "3" "2" "6" "2" …另外,是否可以使用RExcel进行公司工作？另外,使用它有哪些优点/缺点？Rexcel需要多小的文件？
我从.csv文件导入数据,并附加了数据集.
我的问题:一个变量是整数形式,有295个级别.我需要使用这个变量来创建其他变量,但我不知道如何处理这些变量.
这些是什么,我该如何处理它们？
你如何反转R中的一串数字？
例如,我有一个大约1000个六位数字的向量,我想知道它们是否是回文.我想创建一个完全相反的第二组,所以我可以做一个对决.
可能重复:
测试NA并根据结果选择值
假设你有一个向量 - 你对向量进行计算 - 许多元素返回"NA" - 你如何识别这些"NA"并将它们更改为某个可用的整数
Option Explicit
Sub peuler1()
Dim x As Variant
Dim y As Variant
y = 0
For x = 1 To 999
If x Mod 3 = 0 Or x Mod 5 = 0 Then
y = y + x
End If
Next x
Call peuler1
End Sub
这为什么需要这么长时间？它似乎并不太复杂.
有没有办法在vba中说:
from x = 1 to 100, by 10
所以x是1,10,20,30等等到100？
我试图在20x20矩阵中找到2位数的最大对角线乘积.
这会给出一条错误消息:
i <- 17:1
z <- for (j in 1:(18-i))
{b <- max ((x[i,j]*x[i+1,j+1]*x[i+2,j+2]*x[i+3,j+3]))}}
但这不是:
z <- for (i <- 17:1)
{for (j in 1:(18-i))
{b <- max ((x[i,j]*x[i+1,j+1]*x[i+2,j+2]*x[i+3,j+3]))}}
但第二个版本给了我一个太小的数字.为什么第一个不起作用,我认为它会产生正确的答案,但我不明白错误信息.
我使用长变量来表示列和行.当我尝试按类型指定范围时,sheetname.range(cells(i,j), cells(i+1, j+1))我收到方法Range of Object Worksheet failed错误.
在使用长变量作为单元格引用时如何使用范围的任何想法？
如何将输出作为R中的向量？
例如,如果我想拥有
for (i in 1:1000) {if i mod 123345 = 0, a = list(i)}
a
但我想找到所有i划分为123345(即因子)的东西,而不仅仅是最大的一个.