Fixed handling non-finite values in colorBin arg domain.

[CreMindES]

After investigating the special snowflake error message: "Error in if (bins < 2) { : argument is of length zero", it turned out that colorBin does not check for non-finite values in its 'domain' argument.

[CreMindES]

Apologies, after reviewing the contents of test-colors.R, I need additional information about the design choices of domain.

I can think of two common approaches:

1. supply explicit bounds e.g. c(1,100)
2. supply the whole vector and let the function find out its extent

Both of them has their pros and cons, and of course we always try to respect backward compability.
May I ask you to elaborate on the idea of domain in case of NULL or single number?

[jcheng5]

Can you give an example of the case you're trying to fix?

[CreMindES]

The code below gives that not so nice error message, due to not handled NAs.

bw <- c("black", "white");
binpal <- colorBin( palette = bw, domain = c( NA, NA ), bins = 100, pretty = T, alpha = 0.5, na.color = "red" );
binpal(1);

Error in if (bins < 2) { : argument is of length zero

I've run into this scenario due to an error while dynamically calculating the domain ( min and max ).

[CLAassistant]

Thank you for your submission! We really appreciate it. Like many open source projects, we ask that you sign our Contributor License Agreement before we can accept your contribution.

---

Tamás G. Barna seems not to be a GitHub user. You need a GitHub account to be able to sign the CLA. If you have already a GitHub account, please add the email address used for this commit to your account.
_{You have signed the CLA already but the status is still pending? Let us recheck it.}