counting distinct value does not works in shiny

Question

I\'m trying to figure out the number of columns\' vector, using length(unique(x)) in r shiny. However, it doesn\'t work in shiny app.

The codes are below.