I want to run a for loop to calculate additional elements in multiple vectors of a dataset, subsetted by a reactive input, in a shiny environment. I have a large dataset wit