visColormap is supposed to define a colormap. It
returns a function, which will take an integer argument
specifying how many colors interpolate the given colormap.
# 1) define "blue-white-red" colormappalette.name <- visColormap(colormap="bwr")
# 2) use the return function "palette.name" to generate 10 colors spanning "bwr"palette.name(10)