hope,working reader
all code in R file