R paintblob calc color