lapplyに定義された関数を適用する

Question

データセットのリストに適用する関数を定義しましたが、エラーが発生し、その理由がわかりません。私は自分のコードをデバッグしようとしましたが、何が問題なのかまだ分かりません。 My機能は次のとおりです。

lire<-function(element){ 
    d=read.csv(file="element.csv", sep=';', header=FALSE, dec = ",", 
    col.names= c("Action", "Date", "Ouverture", "Haut","Bas","Cloture","VolumeEch")) 
    return(d) 
} 

私はこのようにそれを適用したい：

L <- lapply(Sys.glob("*.csv"), function(x) lire(x)) 

Answer 1

この1つが正常に動作します：

lire<-function(element){ 
    read.csv(file=element, sep=';', header=FALSE, dec = ",", 
      col.names= c("Action", "Date", "Ouverture", "Haut","Bas","Cloture","VolumeEch")) 
} 

elementが連続してSys.glob("*.csv")からすべての値をとります。 dに割り当てて返却する必要はありません。