无法在函数内添加新列

Question

我想简化数据导入并添加带ID的列。如果我手动完成，它可以正常工作。如果我写一个函数，它就不起作用。

#Function
my_function <- function(experiment.ID, group.ID){

    df <- as.data.frame(c(0, 1, 2, 3))
    df$exp_ID     <- experiment.ID
    df$group_ID   <- group.ID
}
df_from_function <- my_function(experiment.ID = "A", group.ID = "group1")


#Manual
experiment.ID = "A"
group.ID = "group1"

df <- as.data.frame(c(0, 1, 2, 3))
df$exp_ID     <- experiment.ID
df$group_ID   <- group.ID

df_from_manual <- df

第一个只返回一个字符。第二个返回带有附加列的数据框。

我做错了什么？