[R] Interactive plot

Sun Jun 29 21:23:54 CEST 2008

I get those errors too but it works anyways.

On Sun, Jun 29, 2008 at 2:09 PM, Ron Michael <ron_michael70 at yahoo.com> wrote:
> It is not working here. I am getting following errors [big list :( ] :
>
>
>
>> library(playwith)
>
> Loading required package: grid
> Warning message:
> In namespaceImportFrom(self, asNamespace(ns)) :
>   replacing previous import: addhandler
>> library(lattice)
>> playwith(barchart(seq_along(result) ~ result,
> + data = data.frame(result = calc(mat, c(alpha, vary[2])))),
> + parameters = list(alpha = seq(2000, 3000, by = 10)))
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Go back to
> previous plot call") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Go forward to next
> plot call") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Redraw the current
> plot (hold Shift for full reload)") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Show help page for
> this plot function") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Loading required package: RGtk2
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Always show this
> window") :
>   Cannot find 'tooltip-text' to set in GtkToggleToolButton, GtkToolButton,
> GtkToolItem, GtkBin, GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned,
> GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Keep this window,
> do not replace it (open next plot in a new window)") :
>   Cannot find 'tooltip-text' to set in GtkToggleToolButton, GtkToolButton,
> GtkToolItem, GtkBin, GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned,
> GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Copy this plot to
> the clipboard (as a bitmap)") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "View and edit
> attached data objects") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Change the plot
> type and settings") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Choose Lattice
> theme") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Time mode: scroll
> along the x-axis") :
>   Cannot find 'tooltip-text' to set in GtkToggleToolButton, GtkToolButton,
> GtkToolItem, GtkBin, GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned,
> GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Choose a panel to
> expand and focus (for further interaction)") :
>   Cannot find 'tooltip-text' to set in GtkToggleToolButton, GtkToolButton,
> GtkToolItem, GtkBin, GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned,
> GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Identify data
> points by clicking on them") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Add your own
> labels to the plot") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Add an arrow to
> the plot") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Edit annotations
> (including arrows)") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Remove labels and
> annotations") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Select a new plot
> region with the mouse") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Zoom out to show
> 4x plot area") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
> Error in `[[<-.GObject`(`*tmp*`, "tooltip-text", value = "Show the full
> scale starting from zero") :
>   Cannot find 'tooltip-text' to set in GtkToolButton, GtkToolItem, GtkBin,
> GtkContainer, GtkWidget, GtkObject, GInitiallyUnowned, GObject, RGtkObject
>
>
>
>
>
> Any idea how to fix that?
>
>
>
> --- On Mon, 30/6/08, Gabor Grothendieck <ggrothendieck at gmail.com> wrote:
>
> From: Gabor Grothendieck <ggrothendieck at gmail.com>
> Subject: Re: [R] Interactive plot
> To: ron_michael70 at yahoo.com
> Cc: r-help at stat.math.ethz.ch
> Date: Monday, 30 June, 2008, 12:30 AM
>
> In ?playwith the third example seems pretty close to what you
> want.  Here it is changed to correspond to your setup.
> Remove the barplot line from calc since we don't want calc to do
> any plotting and then try this:
> library(lattice)
> playwith(barchart(seq_along(result) ~ result,
> 	data = data.frame(result = calc(mat, c(alpha, vary[2])))),
> 	parameters = list(alpha = seq(2000, 3000, by = 10)))
> On Sun, Jun 29, 2008 at 1:07 PM, Ron Michael <ron_michael70 at yahoo.com>
> wrote:
>> Hi all R users. I already done through some of the examples given with
> playwith packages and feel nowhere they are matching with my requirement.
> Can
> amyone please suggest me how to create my desired interactive plot with
> "tkrplot" ?
>>
>> I want following. Let look at following codes :
>>
>> mat = cbind(c(0.000059710430,0.000023057380), c(0.000023057380,
> 0.00005971089)) set.seed = 1000 vary = runif(dim(mat)[1], 2000, 3000) calc =
> function(mat, vary)
>> {
>> result = vector(length = (length(vary)+1))
>> result[1] = sqrt(t(vary) %*% vary)
>> for (i in 1 : length(vary))
>> {
>> result[(i+1)] = sum(vary)*sum(vary*mat[,i])
>> }
>> barplot(result)
>> return(result)
>> }
>>
>> Now I want to put a slider in the plot where user move the slider for the
> 1st element of the vector "vary" and automatically this result will
> be reflected at the plot window. Can anyone please tell me how to do that
> with
> tkrplot or TeachingDemos ?
>>
>>
>>
>>
>> --- On Sun, 29/6/08, Ron Michael <ron_michael70 at yahoo.com> wrote:
>>
>> From: Ron Michael <ron_michael70 at yahoo.com>
>> Subject: Re: [R] Interactive plot
>> To: "Gabor Grothendieck" <ggrothendieck at gmail.com>
>> Cc: r-help at stat.math.ethz.ch
>> Date: Sunday, 29 June, 2008, 11:48 PM
>>
>> Hi, whenever I try to load the playwith package I am getting following
> warning :
>>
>>> library(playwith)
>> Loading required package: lattice
>> Loading required package: grid
>> Warning message:
>> In namespaceImportFrom(self, asNamespace(ns)) :
>>   replacing previous import: addhandler
>>
>> Can anyone please tell me why I am getting that warning?
>>
>> --- On Sun, 29/6/08, Gabor Grothendieck <ggrothendieck at gmail.com>
> wrote:
>>
>> From: Gabor Grothendieck <ggrothendieck at gmail.com>
>> Subject: Re: [R] Interactive plot
>> To: ron_michael70 at yahoo.com
>> Cc: r-help at stat.math.ethz.ch
>> Date: Sunday, 29 June, 2008, 8:18 PM
>>
>> Install the GTK runtime:
>>
>> http://www.ggobi.org/rgtk2/
>>
>> On Sun, Jun 29, 2008 at 9:06 AM, Ron Michael
> <ron_michael70 at yahoo.com>
>> wrote:
>>> whenever I try to load "playwith" package I get following
> error
>> :
>>>
>>>> library(playwith)
>>> Loading required package: lattice
>>> Loading required package: grid
>>> Error in inDL(x, as.logical(local), as.logical(now), ...) :
>>>   unable to load shared library
>> 'C:/PROGRA~1/R/R-27~1.1/library/RGtk2/libs/RGtk2.dll':
>>>   LoadLibrary failure:  The specified module could not be found.
>>>
>>> Error: package/namespace load failed for 'playwith'
>>>
>>> What to do?
>>>
>>> --- On Sun, 29/6/08, Liviu Andronic <landronimirc at gmail.com>
> wrote:
>>>
>>> From: Liviu Andronic <landronimirc at gmail.com>
>>> Subject: Re: [R] Interactive plot
>>> To: "Ron Michael" <ron_michael70 at yahoo.com>
>>> Cc: r-help at stat.math.ethz.ch
>>> Date: Sunday, 29 June, 2008, 7:46 PM
>>>
>>> On 6/29/08, Ron Michael <ron_michael70 at yahoo.com> wrote:
>>>>  Now I want to present the plot in some interactive manner. I want
> to
>> put
>>> a slider in the plot where user move the slider for the 1st element of
> the
>>> vector "vary" and automatically this result will be
> reflected at
>> the
>>> plot window.
>>>>
>>> playwith: A GUI for interactive plots using GTK+ ? [1]
>>>
>>> [1] http://cran.at.r-project.org/web/packages/playwith/index.html
>>>
>>> Send instant messages to your online friends
> http://uk.messenger.yahoo.com
>>>        [[alternative HTML version deleted]]
>>>
>>>
>>> ______________________________________________
>>> R-help at r-project.org mailing list
>>> https://stat.ethz.ch/mailman/listinfo/r-help
>>> PLEASE do read the posting guide
>> http://www.R-project.org/posting-guide.html
>>> and provide commented, minimal, self-contained, reproducible code.
>>>
>>>
>>
>> Send instant messages to your online friends http://uk.messenger.yahoo.com
>>        [[alternative HTML version
> deleted]]______________________________________________
>> R-help at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>>
>> Send instant messages to your online friends http://uk.messenger.yahoo.com
>>        [[alternative HTML version deleted]]
>>
>>
>> ______________________________________________
>> R-help at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>>
>>
>
> Send instant messages to your online friends http://uk.messenger.yahoo.com