オペレータをスキーム関数に渡すには

Question

スキーム関数に問題があります。

(define myfun(operator lis) 
    (if(null? lis) 
    '() 
    (cons(operator (car lis)(car lis))myfun(operator (cdr lis)) 
)))) 

機能は、たとえば(+'(1 2 3 4)) のためのパラメータと、リストとして演算子を取り、私は関数を呼び出すしようとすると、私が取得エラーです：番号を期待しますが、リストを受け取りました。だから私の質問は、どのように私は演算子とリストを使用して再帰的に関数を呼び出すのですか？

UPDATE：ちょうどオペレータ前'記号を必要としていました。

Answer 1

ただの引用せずに、関数に+を渡します。 +は加算関数を示す。

(define (apply-op op x) 
    (op x x)) 

は

(apply-op + 2) ==> 4