Failed with smooth line

[hoasxyz]

I tried to use smooth lines for the same aim, but finally failed:

dySmoothPlotter <- function(dygraph) {
  dyPlotter(dygraph = dygraph,
            name = 'smoothPlotter',
            path = system.file("plotters/smooth-plotter.js",
                               package = "dygraphs"))
}

dygraph(ldeaths) %>% 
  dyRangeSelector() %>%
  dySmoothPlotter()

The file location is right, but these code do not draw any lines. Any solutions or hints?