小编Mat*_*erg的帖子

我读过(来自Slava Pestov)因为Lisp影响了因子,但我不确定我能理解怎么样？他们的编程语言不是很不一样吗？

因此,对于我的任务,我必须编写一个程序,要求用户输入整数,然后打印出该数字的素数因子分解.这就是我所拥有的:

import java.util.Scanner;

public class PrimeFactor {
    public static void main(String[] args) {
        System.out.print("Enter a positive number: ");
        Scanner scanner = new Scanner (System.in);
        int number = scanner.nextInt();
        int count;
        for (int i = 2; i<=(number); i++) {
            count = 0;
            while (number % i == 0) {
                number /= i;
                count++;
                if (count == 0) {
                    continue;
                }
            }
            System.out.println(i+ "**" + count);
        }
    }
}

我现在的问题是,每当我有一样,数量15453运行它,我得到各个因素的列表,从1到100的指数时,我只想要质因子,和我被困在如何继续.

我想要一个标签,在其中有一个指数.这是我的代码

vall = format(cor(x,y)*cor(x,y),digits=3)
eq <- expression(paste(R^2," = ",vall,sep=""))
text(legend.x,legend.y,eq,cex=1,font=2)

但文字看起来就像这样

如何显示实际的vall(而不是文本"vall")

我确信这是一个多次被问到的简单问题,但这是我发现很难知道要搜索哪些术语以便找到解决方案的时候之一.我有一个简单的列表列表,如下面的列表:

sets <- list(S1=NA, S2=1L, S3=2:5)

> sets
$S1
[1] NA

$S2
[1] 1

$S3
[1] 2 3 4 5

我有一个标量变量val,可以取任何整数的值sets(但永远不会NA).假设val <- 4- 那么,返回一个TRUE/FALSE向量的快速方法是什么,set其中TRUE表示val在该列表中的每个列表,而FALSE表示不是？在这种情况下,我想要的东西

[1] FALSE FALSE  TRUE

我希望会有一些递归的形式,%in%但我没有运气寻找它.谢谢!

假设我有一个具有以下结构的数据框:

DF <- data.frame(x = 0:4, y = 5:9)
> DF
  x y
1 0 5
2 1 6
3 2 7
4 3 8
5 4 9

将"DF"转换为具有以下结构的数据框的最有效方法是什么:

w x y
1 0 5
1 1 6
2 1 6
2 2 7
3 2 7
3 3 8
4 3 8
4 4 9

其中w是滚动数据帧'DF'的长度为2的窗口.窗口的长度应该是任意的,即长度为3的产量

w x y
1 0 5
1 1 6
1 2 7
2 1 6
2 2 7
2 3 8
3 2 …

因子手册的这一页讨论了存储在continuation中的这些类型的堆栈:

• datastack
• retainstack
• 调用堆栈
• namestack
• catchstack

这些堆栈究竟拥有什么？对我来说最令人困惑的三个是callstack,retainstack和namestack.

我正在完成一个R教程.我一直在研究一个函数,函数的一个部分是接受一个参数并用它来定义一个查找数据的目录.然后必须加载该数据.

正如以下作品:

getmonitor <- function(id, directory){

csvfile <- function(id) {
    if (id < 10) { 
        paste0(0,0,id,".csv")
    } else if (id < 100) {
        paste0(0,id,".csv")
    } else paste0(id,".csv")
}

foo <- read.csv(csvfile(id))

}

精细.但我现在必须使用"directory"参数来定义必须从中读取csv文件的目录.我在这里尝试了各种各样的事情无济于事.

目前,如果假设数据在工作目录中,则代码可以工作.我需要说"转到名为(目录)的目录,然后读取.csv.

包含所有数据文件的目录称为"specdata",因此目录的参数是"specdata".

我尝试了以下方法:

getmonitor <- function(id, directory){

  csvfile <- function(id) {
      if (id < 10) { 
          paste0(0,0,id,".csv")
      } else if (id < 100) {
          paste0(0,id,".csv")
      } else paste0(id,".csv")
  }

  filepath <- append(directory,"/",csvfile(id))

  foo <- read.csv(filepath)

 }

但后来我收到一条错误消息"错误!之后:无效的参数类型"

我尝试了一些不同的东西,如果我剪切并粘贴所有代码,它可能会比帮助更麻烦.

这样做的逻辑方法是什么？我是否在正确的轨道上追加？如果不是,我还应该起诉什么？我需要获取参数"directory",然后从该目录加载数据.

我有一个单词构造了一个我想要被引用的引文.但是,当我加载代码时,我得到的不能将"call"应用于运行时计算值.如果我使用walker并逐步执行它按预期执行的代码.你怎么称呼建造的报价？

: ba>struct ( array class -- struct array )
[ <struct> swap ] keep struct-slots
[
    [ type>> to-type ] keep  
    name>> setter-word 1quotation curry
    [ over ] dip  curry  call drop
] each
; 

编辑:这确实有效

: ba>struct ( array class -- struct array )
    [ <struct> swap ] keep struct-slots
    [
        [ type>> to-type ] keep  
        name>> setter-word 1quotation curry
        [ over ] dip  curry  call( -- x ) drop
    ] each
    ; 

问题源于运行时不知道构造引用的堆栈效应是什么.在这些情况下,您必须声明堆栈与调用的引用相似.

我们如何使用Set Variable if关键字，其中关键字返回一个需要在RobotFramework.

例如：${Var} = set variable if ${i}==10 Keyword。

我试图在Fedora 20上安装R-3.1.1."make"给了我以下警告

configure:警告:您无法构建R手册的信息或HTML版本

我需要做些什么来解决这个问题？