R Nombre de visualización de registro del script

Este es un ejemplo atómico de mi problema actual:

Por el momento tengo un proyecto que contiene varios scripts R (todos en el mismo directorio llamado DIR). Tengo un script principal en DIR que busca todos los archivos R y que contiene una configuración básica:

basicConfig()

Tomo dos guiones en DIR, dog.r y cat.r. Actualmente solo tengo una función en estos scripts. En dog.r:

feedDog <- function(){
    loginfo("The dog is happy to eat!", logger="dog.r")

}

Y en cat.r:

feedCat <- function(){
     loginfo("The cat is voracious", logger="cat.r")
}

Está bien con este ejemplo. Pero en realidad tengo algo así como 20 scripts y 20 posibles mensajes de error en cada uno. Para que en lugar de escribir:

loginfo("some message", logger="name of script")

Me gustaria escribir:

loginfo("some message", logger=logger)

Y configurar diferentes registradores. El problema es que si declaro un registrador en cada secuencia de comandos R, solo se tendrá en cuenta cuando genere todos los archivos con mi principal ... No sé cómo evitar este problema.

PD: en Python es posible definir un registrador en cada archivo tomando automáticamente el nombre del script de esta manera:

logger = logging.getLogger(__name__)

Pero me temo que no es posible en R?

Respuestas a la pregunta(1)

Su respuesta a la pregunta