Re: [R] tcltk tkwidget(..."table")

2016-01-22 Thread Adrian Waddell
I have written some content about the R bindings to Tcl and Tk: http://waddella.github.io/loon/learn_R_tcltk.html And the pack geometry manager http://adrian.waddell.ch/EssentialSoftware/Rtcltk_geometry.pdf But if you have no experience with building graphical user interfaces then you might wan

Re: [R] choropleth packages (US)

2015-12-14 Thread Adrian Waddell
_pal(USArrests$UrbanPop)) map(m, col=cols, fill=TRUE) # map.axexs() ## or with no borders map(m, col=cols, fill=TRUE, border=NA) Greetings, Adrian On Fri, Dec 11, 2015 at 1:22 AM, Benjamin Tyner wrote: > Very nice Adrian. Is there a straightforward way to add Alaska and Hawaii at &g

Re: [R] choropleth packages (US)

2015-12-10 Thread Adrian Waddell
Hi, You can also use the 'maps' package for the map data and the 'scales' package for the color mapping. E.g. library(maps) library(scales) m <- map('state', fill=TRUE, plot=FALSE) s_data <- tolower(rownames(USArrests)) s_map <- tolower(m$names) mapping <- lapply(s_data, function(state) { w

Re: [R] How to understand whether a class is a S3 class?

2010-08-02 Thread Adrian Waddell
Megh Dal yahoo.com> writes: > > Hi, is there any way to say: "this class 'x' is a S3 class?" For example what > is the type of class "data.frame"? > Is it a S3 class or S4? > > How can I get a complete list of all S3 classes currently available? > > Thanks, > > There is the isS4 function

Re: [R] Some questions about R's modelling algebra

2010-07-02 Thread Adrian Waddell
> Hadley Wickham rice.edu> > > Where is %in% documented within R? I'm pretty sure it's a different > action to ?"%in%, and it's not mentioned in ?formula You find the documentation for operators like <-, %in%, if, etc by putting the operators between qoutes ?"%in%" ?"<-" ?"if" Regards, A

[R] Windows, OSX and Linux: updating a graphic device and double buffering

2010-06-11 Thread Adrian Waddell
c device. E.g. with a command like dev.flush()? How can I run my code on all operating systems without any "jumps"? Regards, Adrian Waddell Here is a minimal example code: library(tcltk) tt <- tktoplevel() tkpack(top <- tkframe(tt), side = "top") SliderValu