小编sda*_*das的帖子

我在我的Lisp代码中收到以下错误:

value (PROBLEM1 (+ N 1)) is not of the expected type NUMBER.

代码的目的是将所有可以被3或5整除的数字加起来.

(defun problem1 (n)
  (if (< n 1000)
      (if (or (= 0 (mod n 3)) (= 0 (mod n 5))) 
      (apply '+ '(n (problem1 (+ n 1)))) 
      (apply '+ '(0 (problem1 (+ n 1)))))
   0))

我意识到错误可能是因为problem1正在返回一个列表 - 但是当我跟踪我头脑中的值时,该函数应该正常工作.因此,如果我滥用(或遗失)撇号,有人可以向我解释一下吗？

这是用Python和Pygame实现的,但它是一个相当普遍的编程问题(意思是独立于实现).

我有一个函数,它接受x和y整数作为输入,并应生成一个3x3网格的相邻点(包括x和y).

注意:0,0原点从左上角开始.向右移动时x增加,y向下移动时增加.

例如.

def nearest_grid(x, y):
    return [[(x-1,y-1),(x,y-1),(x+1,y-1)],[(x-1,y)(x,y),(x+1,y)],[(x-1,y+1),(x,y+1),(x+1,y+1)]]

因此,给定一个网格和一个点(标记为p),它将以下列为3个列表的列表:

x  x  x
x  p  x
x  x  x

这是在Python中执行此操作的最有效/易读的方法吗？

编辑:假设我想传递一个半径值(上面的半径值为1).所以,如果我通过半径值为2,那么上述方法很快就会变得很烦人.有更普遍的方式吗？

我在.emacs文件中运行以下代码:

(defun load-hooks ()
    (add-hook 'after-save-hook 'my-hook))

(add-hook 'c-mode-hook 'load-hooks)

(defun my-hook () ... )

但是,my-hook即使我处于不同的模式,内容也会在保存时运行.我错过了一步吗？

使用Python,

h = 0x11012
# ... ???
result = '11012'

从h - >结果我需要采取哪些中间步骤？

我有generate-code一个while在Clojure循环中运行的函数:

; ...
(with-local-vars [code nil]
    (while true
        (var-set code (generate-code @code))
        (write-to-file @code)
        (execute-code @code)))

显然这不是Clojure-esque - 有没有更好的方法来做到这一点而不引入局部变量？

我有一个使用自定义适配器调用Button填充a .因此,没有.xml文件.GridViewgetView()Button

有没有办法以编程方式围绕Button？

我在Haskell中编写了以下线性代数向量

data Natural where
    Zero :: Natural
    Succ :: Natural -> Natural

data Vector n e where
    Nil :: Vector Zero e
    (:|) :: (Show e, Num e) => e -> Vector n e -> Vector (Succ n) e
infixr :|

instance Foldable -- ... Vector ..., but how do I implement this?

当我尝试实现时Foldable,我遇到了问题Zero并且Succ有不同的定义(即.*和* - >*).

这个问题有明显的解决方案吗？

我收到错误

*** Exception: Prelude.read: no parse

我跑的时候

read $ show $ Vector3 1 2 3

(注意show Vector3 1 2 3返回"Vector3 {v3x = 1.0, v3y = 2.0, v3z = 3.0}".)

我正在使用AC-Vector软件包以及其他软件包

{#- LANGUAGE StandaloneDeriving #-}
deriving instance Read Vector3

因为原始包不会自动导出Read.

为什么read无法解析字符串？

delegate如果没有提供构造函数，变量的初始值是多少？

class Example {
    weak var delegate: Bool?
}

当我尝试使用 a 时，XCode 抛出以下约束错误UIStackView：

(
    "<NSAutoresizingMaskLayoutConstraint:0x7f87a1dfa360 h=--& v=--& V:[UIStackView:0x7f87a6403a00(0)]>",
    "<NSLayoutConstraint:0x7f87a6410590 'UISV-canvas-connection' UIStackView:0x7f87a6403a00.top == UIView:0x7f87a6409630.top>",
    "<NSLayoutConstraint:0x7f87a6444170 'UISV-canvas-connection' V:[UIView:0x7f87a644d790]-(0)-|   (Names: '|':UIStackView:0x7f87a6403a00 )>",
    "<NSLayoutConstraint:0x7f87a645bec0 'UISV-fill-equally' UIView:0x7f87a6407a10.height == UIView:0x7f87a6409630.height>",
    "<NSLayoutConstraint:0x7f87a6458f40 'UISV-fill-equally' UIView:0x7f87a644d790.height == UIView:0x7f87a6409630.height>",
    "<NSLayoutConstraint:0x7f87a64306d0 'UISV-spacing' V:[UIView:0x7f87a6409630]-(5)-[UIView:0x7f87a6407a10]>",
    "<NSLayoutConstraint:0x7f87a643bea0 'UISV-spacing' V:[UIView:0x7f87a6407a10]-(5)-[UIView:0x7f87a644d790]>"
)

Will attempt to recover by breaking constraint 
<NSLayoutConstraint:0x7f87a643bea0 'UISV-spacing' V:[UIView:0x7f87a6407a10]-(5)-[UIView:0x7f87a644d790]>

我的视图控制器如下：

public class ExampleController: UIViewController {

    let v1 = UIView(frame: CGRect(x: 0, y: 0, width: 250, height: 100))

    let v2 = UIView(frame: CGRect(x: 0, y: 0, width: 250, height: 300))

    let …