R paintblob calc hifreq color