density r script update