¿Cómo buscar un entorno usando ls () dentro de una función?

Quiero encontrar un conjunto de funciones y guardarlas, porque quiero enviarlas a un servidor remoto en un archivo Rdata, y no quiero instalar un nuevo paquete en el servidor.

Aunque recibo un error al usar el siguiente enfoque, los enfoques más fáciles / mejores son bienvenidos.

MWE:

Aquí hay dos funciones ficticias:

abcd.fun.1    <- function() return(1)
abcd.fun.2    <- function() return(2)

Puedo identificar las funciones ficticias:

ls()[grep('abcd', ls())]

Pero cuando envuelvo esto en una función:

 find.test <- function(x) {
     return(ls()[grep(x, ls())])
 }
 find.test('abcd')

La función devuelvecharacter(0)

Finalmente, me gustaría

 save(find.test('abcd'), file = test.Rdata)

Respuestas a la pregunta(2)

Su respuesta a la pregunta