Bonjour,
j'utilise une très grande boucle for dans mon script et je reçois ce message d'erreur
Error in source[i] : object of type 'closure' is not subsettable
le code est le suivant
verification3<-is.numeric(length(locataires[,c("source")]))
verification3<-as.character(verification3)
date.d.enquête.jour<-locataires$date.d.enquête.jour
date.d.enquête.mois<-locataires$date.d.enquête.mois
date.d.enquête.année<-locataires$date.d.enquête.année
adresse.du.logement.code.postal<-locataires$adresse.du.logement.code.postal
adresse.du.logement.nom.de.commune<-locataires$adresse.du.logement.nom.de.commune
date.de.référence.jour<-locataires$date.de.référence.jour
date.de.référence.mois<-locataires$date.de.référence.mois
si.enquête.pro.raison.sociale<-locataires$si.enquête.pro.raison.sociale
typed.habitat<-locataires$typed.habitat
idendifiant.logement<-locataires$idendifiant.logement
adresse.du.logement.N<-locataires$adresse.du.logement.N
adresse.du.logement.type.de.R<-locataires$adresse.du.logement.type.de.R
adresse.du.logement.nom.de.rue<-locataires$adresse.du.logement.nom.de.rue
époque.de.construction<-locataires$époque.de.construction
nombre.de.pièces<-locataires$nombre.de.pièces
surface<-locataires$surface
type.de.location<-locataires$type.de.location
type.de.gestion<-locataires$type.de.gestion
date.d.emménagement.mois<-locataires$date.d.emménagement.mois
date.d.emménagement.année<-locataires$date.d.emménagement.année
loyer.mensuel.date.d.enquête..hors.charges...cette.année<-locataires$loyer.mensuel.date.d.enquête..hors.charges...cette.année
for(i in seq(from=1, to=length(locataires[,c("nombre.de.pièces")]))){
if(source[i]!="" && is.na(source[i])==F &&
mode.de.collecte[i]!="" && is.na(mode.de.collecte[i])==F &&
date.d.enquête.jour[i]!="" && is.na(date.d.enquête.jour[i])==F &&
date.d.enquête.mois[i]!="" && is.na(date.d.enquête.mois[i])==F &&
date.d.enquête.année[i]!="" && is.na(date.d.enquête.année[i])==F &&
adresse.du.logement.code.postal[i]!="" && is.na(adresse.du.logement.code.postal[i])==F &&
adresse.du.logement.nom.de.commune[i]!="" && is.na(adresse.du.logement.nom.de.commune[i])==F &&
date.de.référence.jour[i]!="" && is.na(date.de.référence.jour[i])==F &&
date.de.référence.mois[i]!="" && is.na(date.de.référence.mois[i])==F &&
si.enquête.pro.raison.sociale[i]!="" && is.na(si.enquête.pro.raison.sociale[i])==F &&
typed.habitat[i]!="" && is.na(typed.habitat[i])==F &&
idendifiant.logement[i]!="" && is.na(idendifiant.logement[i])==F &&
adresse.du.logement.N[i]!="" && is.na(adresse.du.logement.N[i])==F &&
adresse.du.logement.type.de.R[i]!="" && is.na(adresse.du.logement.type.de.R[i])==F &&
adresse.du.logement.nom.de.rue[i]!="" && is.na(adresse.du.logement.nom.de.rue[i])==F &&
époque.de.construction[i]!="" && is.na(époque.de.construction[i])==F &&
nombre.de.pièces[i]!="" && is.na(nombre.de.pièces[i])==F &&
surface[i]!="" && is.na(surface[i])==F &&
type.de.location[i]!="" && is.na(type.de.location[i])==F &&
type.de.gestion[i]!="" && is.na(type.de.gestion[i])==F &&
date.d.emménagement.mois[i]!="" && is.na(date.d.emménagement.mois[i])==F &&
date.d.emménagement.année[i]!="" && is.na(date.d.emménagement.année[i])==F &&
loyer.mensuel.date.d.enquête..hors.charges...cette.année[i]!="" && is.na( loyer.mensuel.date.d.enquête..hors.charges...cette.année[i])==F){
verification3[i]<-"1"
}
else
{
verification3[i]<-"0"
}
}
j'aimerais savoir pourquoi ce message d'erreur apparaît .
merci