Remoção de variáveis

Boa Noite Pessoal

Eu criei uma função para um usuário leigo, cujo objetivo é remover variáveis de um data frame:

remove.variables <- function(dataset.name, vars.to.remove)
{
# scan the variables to be removed
for (x in 1 : length(vars.to.remove))
{
# transform command Remove in "data$variable <- NULL"
command.Remove <- paste(dataset.name,"$",vars.to.remove[x], " <- NULL",sep="")
# execute the command
command.Remove <- eval(parse(text=command.Remove))
} # for (x in 1 : length(vars.to.remove))

No script1 onde tenho dois data frames (data1 e data2) e executo o comando abaixo, cuja intenção é remover as variáveis "C" e "E" do data frame "data1"

remove.variables("data1",c("C","E"))

Em um teste local dentro da função remove.variables tudo funciona como devia, porém quando a executo a partir do script 1 a remoção não ocorre, creio que algum parametro informando que deve ser removido globalmente.

Se alguem puder me dar uma dica agradeço