erro data.table quando usado através de knitr, gWidgetsWWW

Estou experimentando com gWidgetsWWW e encontrei um erro estranho. Eu criei um botão com um manipulador para knit2html um relatório que usou o operador de atribuição data.table ": =". O relatório voltou com este erro:

Erro:: = é definido para uso apenas em j e (atualmente) apenas uma vez; isto é, DT [i, col: = 1L] e DT [, newcol: = soma (colB), por = colA] estão ok, mas não DT [i, col]: = 1L, não DT [i] $ col: = 1L e não DT [, {newcol1: = 1L; newcol2: = 2L}]. Por favor veja ajuda (": ="). Verifique se is.data.table (DT) é TRUE.

O relatório gera como esperado usando knit2html diretamente e também através do botão "Knit HTML" do RStudio, então não tenho certeza porque ele falha quando knit2html é chamado pelo manipulador.

Aqui está uma janela do gWidgetsWWW "test_gui.R":

library(gWidgetsWWW)
library(knitr)

w<-gwindow("Test Window")
g<-ggroup(horizontal=F,cont=w)
b<-gbutton("Report Button",cont=g,handler=function(h,...){
    knit2html("test_report.Rmd")
    localServerOpen("test_report.html")
})

visible(w)<-T

Aqui está um exemplo do Markdown Doc que produz o erro:

Test Report
===========

```{r test_chunk}
library(data.table)

df<-data.frame(State=rownames(USArrests),USArrests)

data.table(df)[,State:=tolower(State)]

```

Não tenho certeza porque, mas quando eu chamo localServerOpen ("test_gui.R") e clique no botão, eu recebo o erro ...

Alguma ideia?

questionAnswers(2)

yourAnswerToTheQuestion