fbscripts.R aangevuld met functies