Can someone help me with R implementation for the code on the link below?

Question

link: https://bl.ocks.org/AlainRo/9264cd08e341f2c92f020c39642c34d1

Hi I am trying to implement the above D3 code in R, I am getting the background printed, but I am u