R version 4.0.3: Function For calculating Means of certain column values in R returns NaN when a row filtering argument is set to 1:278 and lower

Question

I have written a function which is meant to extract the means of particle quantities in the air. However the code works perfectly, if the Id argument is defined to be anythi