Access dataframe from inside a function from the outside

I wrote a function that randomly increases the c% percentage of data by i%. I need to do this on multiple dataframes. So the function does that, but I am unable to access the processed value from the outside.

library(tidyverse) value <- iris[1:120,] iris1 <- value[2:95,] set.seed(42) attackfunc <- function(day,dataattack,howmuchattack){ shuffled= day[sample(1:nrow(day)), ] n = as.integer((dataattack/100)*nrow(day)) #select percentage of data to be changed extracted <- shuffled[1:n, ] extracted$changedload <- extracted[,1]*((howmuchattack/100)+1) #how much the data changes pertubeddata<- shuffled %>% mutate(Sepal.Length = ifelse(row_number() <= n, extracted$changedload, Sepal.Length)) reshuffled <- pertubeddata[order(as.numeric(rownames(pertubeddata))),] reshuffled} 

I would like to access reshuffled from outside the function so that I can use that to do some more calculations.

Thank you.