Using R 4.0.3 on macOS Catalina 10.15.7, calculating the mean of a large set of numbers yields too small result

Question

I would like to create a function, which reads data out of multiple files and calculates the mean of a certain column. Therefore I created the function below.

The fun