小编Jos*_*lor的帖子

我不明白为什么我的获取最大数字的函数不起作用。如果我正确地思考这一点，如果第一个原子小于第二个原子，那么您调用该函数减去列表中的第一个原子，否则您将使用列表的其余部分构造第一个原子，即最大的原子。相关代码：

(define (getlargest a_list)
  (cond
    ((null? a_list) '())
    ((< (car a_list) (cadr a_list)) (getlargest (cdr a_list)))
    (else (cons (car a_list) (getlargest(cdr a_list))))))

我正在使用Fedora 19 SBCL.我正在尝试安装eager-future2.我已经下载了源代码,但我无法弄清楚如何安装它.我试过了

(asdf:load-system 'eager-future)

我甚至尝试在源代码中加载单个.lisp文件,但每当我尝试使用pcall函数时,我都会收到错误,"未定义函数PCALL".

是否可以使用列表作为参数调用make-array函数？例如:

(make-array '((length '("a" "b")) (length '("r" "8" "5"))))

返回:

#<TYPE-ERROR expected-type: NUMBER datum: (LENGTH '(...

即使我尝试使用以下命令转换长度的结果:

(coerce (length '(1)) 'number)

它适用于一维数组但不适用于二维数组.

是否可以使用SPARQL生成三元组的随机样本？我认为可能是通过SAMPLE函数,但这会返回一个SAMPLE.

我的解决方法是生成一个与OFFSET关键字一起使用的随机数,并使用LIMIT关键字返回所需的样本大小.我只是将偏移的随机数硬编码为200以方便,如下所示:

SELECT *
WHERE {
?s ?p ?o
} 
OFFSET 200 #random number variable
LIMIT 100

有没有更好的建议从SPARQL端点生成100个数据三元组的随机样本？

所以我有这个小函数在一组3个列表中返回最小值,有没有办法可以把它写得更好看？它对我来说似乎不太好看,但是我可能不知道这意味着什么(我是一个lisp noob)任何提示都会非常感激.

;;;;minimum of 3

(defun minimum-of-3 (list1 list2 list3);returns the minimum value when comparing 3 lists
    (setq minimum-list '())
    (setq mini '())
    (loop for x in list1
            for y in list2
            for z in list3
            do
            (push x mini)
            (push y mini)
            (push z mini)
            (push (apply 'min mini) minimum-list)
            (setq mini '()))

    (reverse minimum-list))

我想根据从斯坦福解析器检索的语法生成句子，但 NLTK 无法解释 PRP$。

from nltk.parse.stanford import StanfordParser
from nltk.grammar import CFG
from nltk.parse.generate import generate

sp=StanfordParser(model_path='/home/aman/stanford_resource/stanford-parser-full-2014-06-16/stanford-parser-3.4-models/edu/stanford/nlp/models/lexparser/englishPCFG.ser.gz',path_to_jar='/home/aman/stanford_resource/stanford-parser-full-2014-06-16/stanford-parser.jar',path_to_models_jar='/home/aman/stanford_resource/stanford-postagger-full-2014-08-27/stanford-postagger-3.4.1.jar')
sent1='He killed the tiger in his pants'
parse_result=sp.raw_parse(sent1)
grammar_list=[]

for p in parse_result:
    l=p.productions()
    grammar_string='\n'.join(map(str,l))
    grammar=CFG.fromstring(grammar_string)
    #grammar_list.append(grammar)
    #for s in generate(grammar,n=3):
    #    print s




ValueError: Unable to parse line 11: NP -> PRP$ NNS
Expected a nonterminal, found: $ NNS

它怎么能工作。我是否应该专门针对这些语法类别指导 nltk。

我在Tanimoto的使用Common Lisp的人工智能元素中找到了这个:

; sample formula:
;
;  d     2
;  --   x  + 2x
;  dx

; represented by f0 as follows:
(setf  f0 '(d (+ (exp x 2) (* 2 x)) x))

这难道不该是expt不是exp？这个程序,LEIBNIZ.lispexp在我认为它应该是的许多地方使用expt.我错过了什么？这只是历史问题吗？或者这是一个错误？

我有一个简单的问题。当我在DBpedia SPARQL端点上运行此查询时，我得到5个电影URI的列表：

PREFIX rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#> 

select ?film {
?film rdf:type <http://schema.org/Movie>.

}
limit 5

我正在尝试访问列表中每部电影的所有谓词和对象。我试过了，但是没有用。

PREFIX rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#> 

select ?film ?p ?o {
?film rdf:type <http://schema.org/Movie>;
      ?p ?o.
}
group by ?film
limit 5

有什么建议吗？

如何在Lisp中将数字从某个基数转换为基数10？是否有任何defaut功能可以做到这一点,如果不是我怎么能补充该功能？

当我在学习HTML时,它是非常有益的,我知道ol的手段ordered list,tr是table row等,有些口齿不清基元/形式很简单:funcall应该是function call,defmacro- define macro.有些是在中间 - incf是...... increment... f???但是因为普通的口齿不清是如此古老,这种原始/特殊形式/等......似乎没有敲响钟声.你们能帮助我搞清楚吗？更重要的是:我在哪里可以找到关于学习每一个背后的意义/历史的权威资源？(我会接受基于第二个问题的答案)

该文档也没有帮助我:

* (describe #'let)

#<CLOSURE (:SPECIAL LET) {10013DC6AB}>
  [compiled closure]

Lambda-list: (&REST ARGS)
Derived type: (FUNCTION (&REST T) NIL)
Documentation:
  T
Source file: SYS:SRC;COMPILER;INFO-FUNCTIONS.LISP

* (documentation 'let 'function)

"LET ({(var [value]) | var}*) declaration* form*

During evaluation of the FORMS, bind the VARS to the result of evaluating the …