Displaying 2 results from an estimated 2 matches for "tk_choosecolor".
2005 Sep 05
1
tcltk, X11 protocol error: Bug?
...anyone sees something
I am doing foolish
let me know, otherwise I will file a bug report.
Nicholas
##### File clrramp2.r ##############
require(tcltk)
clrRamp <- function(n.col, b.color=NULL,e.color=NULL){
B.ChangeColor <- function()
{
b.color <<- tclvalue(tkcmd("tk_chooseColor",initialcolor=e.color,
title="Choose a color"))
if (nchar(b.color)>0){
tkconfigure(canvas.b,bg=b.color)
Rmp.Draw()
}
}
E.ChangeColor <- function()
{
e.color <<- tclvalue(tkcmd("tk_chooseC...
2012 Jan 30
2
Help page of colors() : add a new example ?
Dear all,
May I suggest to add an example in the help page of the colors() function ?
The following code could be useful to easily choose any color from colors() :
## Millot G. (2011), p.71.
## Figure displaying all the 657 built-in color names of colors().
palette(colors())
tempo<-NULL
for(i in 14:1){tempo<-c(tempo, rep(i,50))}
windows(width=10) # replace by quartz(width=10) for MacOS and