Come scrivere questo codice Lisp/Scheme?

Question

Un'espressione lambda che accetta una funzione (di un argomento) e un numero e applica la funzione al doppio del numero.

Answer 1

Applicando la funzione al doppio del numero:

(lambda (f x) (f (* 2 x))) 

applicando la funzione al numero due volte (che è quello che si può avere lo scopo di chiedere): risposta

(lambda (f x) (f (f x))) 

Answer 2

di Greg è corretta, ma potresti pensare a come potresti risolvere questo problema per trovare la risposta da solo. Qui è un approccio:

; A lambda expression 
;(lambda()) 

; which takes a function (of one argument) and a number 
;(lambda (fun num)) 

; and applies the function 
;(lambda (fun num) (fun num)) 

; to twice the number 
;(lambda (fun num) (fun (* 2 num))) 

((lambda (fun num) (fun (* 2 num))) + 12) 

Answer 3

Ecco un altro modo di avvicinarsi:

Scrivi un contratto, lo scopo e intestazione:

;; apply-double : function -> number -> any 
;; to apply a given function to double a given number 
(define (apply-double fun num) ...) 

scriveremo alcuni test:

(= (apply-double identity 10) 20) 
(= (apply-double - 15) -30) 
(= (apply-double/7) 1/14) 

Definire la funzione:

(define (apply-double fun num) 
    (fun (* 2 num))) 

Questa è un'abbreviazione della ricetta qui: http://www.htdp.org/2003-09-26/Book/