Majlts Nödiga R-script afdcn