create d3 test all in r