Si alguien puede ayudarme con el siguiente problema:

Necesito seleccionar los valores dentro de una lista que cumplan con
condiciones especificas reemplazando los valores antiguos por los nuevos
(los valores de la lista están ordenados).

Ejemplo:

a<-list(c(1,2,2.5,3,3.3,4,4.1,4.7,5),c(1,1.2,2.1,3,3.2,5))
names(a)<-c("a1","a2")
a$a1<-a$a1[a$a1>3]

Mediante la siguiente función me permite realizar lo anterior

rec<-function(indice,valor){
  z<-paste0("a$a",indice)
  b<-paste0(z,"<-",z,"[",z,">",valor,"]")
  eval(parse(text=b),parent.frame())
}

rec(1,3)

Lo que necesito es crear una función que me reciba 3 parámetros
rec<-function(lista,indice,valor)
ya que me permitiría escoger la lista y las condiciones que deseo modificar
en vista que tengo muchas listas con las cuales trabajar.

Intente algo como esto pero si resultados favorables

rec1<-function(lista,indice,valor){
a<-lista
a$a.indice<-a$a.indice[a$a.indice>tiempo]
return(a)
}

Gracias por su ayuda de antemano

	[[alternative HTML version deleted]]

