added thumbnails thingy to R part