r google-visualization

Incrustar gráficos de googlevis en un sitio web



google-visualization (5)

Alternativamente podrías escribir el siguiente código

print(M,"chart", file="myfile")

copie y pegue la salida html en su página web y se ejecutará el gráfico googleVis

Leyendo la googleVis paquete googleVis : "Con el paquete googleVis, los usuarios pueden crear fácilmente páginas web con gráficos interactivos basados ​​en marcos de datos R y mostrarlos a través del paquete R.rsp o dentro de sus propios sitios " . Siguiendo las instrucciones, pude ver los gráficos de muestra, utilizando el método de trazado para objetos gvis. Este método crea de forma predeterminada un archivo rsp en la carpeta rsp / myAnalysis del paquete googleVis, utilizando la información de identificación de tipo y gráfico del objeto y muestra la salida utilizando el servidor web local del paquete R.rsp (puerto 8074 de forma predeterminada ).

¿Alguien podría ayudarme (o proporcionar algún enlace) sobre el procedimiento que alguien debe seguir para integrar dichos gráficos en un sitio web existente (por ejemplo, un sitio de joomla)?


Es posible que el contenido de Flash no funcione en la máquina local. Tuve que cambiar las restricciones de seguridad en el sitio de adobe para que funcione.

Ahora, siguiendo las instrucciones de daroczig, uno puede ver el contenido en el navegador local y no confiar completamente en R.rsp.


Obviamente, creo que esto es demasiado detallado para @ gd047, pero pongo una especie de tutorial ya que puede ser útil para otros lectores que quieran usar googleVis en su propio sitio web.

instala googleVis desde CRAN

install.packages(''googleVis'')

Presta atención a los mensajes.

luego, crea el objeto gvis:

library(googleVis) M <- gvisMotionChart(Fruits, "Fruit", "Year")

Puedes encontrar los contenidos de M por:

> M

y puedes encontrar la trama en tu navegador:

> plot(M)

entonces, lo que es necesario para generar el gráfico es M $ html $ gráfico:

> M$html$chart [1] "<!-- MotionChart ... omitted... /">/n</div>/n"

guardarlo en un archivo:

> cat(M$html$chart, file="tmp.html")

si abre "tmp.html" como un archivo (es decir, la dirección dice files: ///***/tmp.html), puede aparecer una advertencia de seguridad. Lo que necesitas es acceder al html a través de http: //.

Entonces, si puede editar cualquier página web donde esté disponible la etiqueta <script> (por ejemplo, blogger), puede usarla simplemente copiando y pegando el contenido de tmp.html, como esto:

takahashik.blogspot.com/2011/01/googlevis-example.html

Aquí está la famosa versión "iris" del ejemplo:

http://takahashik.blogspot.com/2011/01/googlevis-example-for-data-iris_10.html

De lo contrario, si tiene un servidor web, puede usarlo cargando el archivo tmp.html en el servidor.


Si desea copiar y pegar el gráfico manualmente en un CMS (por ejemplo, el sitio Joomla / Wordpress), puede hacerlo desde la lista html del objeto ''gvis''. Al igual que @kohske sugirió:

# demo data from manual M <- gvisMotionChart(Fruits, "Fruit", "Year") # write the HTML body to a temporary file without header and footer cat(M$html$chart, file="temp.html") # or with caption included: cat(paste(M$html[c("chart", "caption")], collapse="/n"), file="temp.html")

Luego copie y pegue el contenido de temp.html en su sitio Joomla. Debe prestar atención para pegar el código como contenido HTML, no en el editor WYSIWYG (por ejemplo, Tiny MCE).

Si desea mostrarlo en una página separada, no olvide incluir también el encabezado y el pie de página:

# demo data from manual M <- gvisMotionChart(Fruits, "Fruit", "Year") # write the HTML to a temporary file with header and footer all included cat(paste(M$html, collapse="/n"), file="temp.html")

Y por último: puede cargar fácilmente este documento, por ejemplo, en un servidor ftp y acceder a él a través de cualquier navegador.


Tengo una secuencia de comandos para ejecutar automáticamente como actualizaciones de datos y colocar un gráfico de googleVis en un sitio web con RCurl y googleVis. Aquí hay un ejemplo donde visChart es el gráfico:

library(RCurl) library(googleVis)

hacer visChart

write(visChart$html$chart, file=''visChart.html'') ftpUpload(''visChart.html'', "ftp://username:[email protected]/path/to/''visChart.html")

visChart$html$chart solo proporciona el html para solo el gráfico sin pie de página, por lo que luego uso un iframe en mi HTML para acceder a este gráfico. Si está utilizando un sitio de Google, blogger o quiere un gadget de Google, puede usar createGoogleGadget ():

write(createGoogleGadget(visChart), file=''visChart.xml'') ftpUpload(''visChart.xml'', "ftp://username:[email protected]/path/to/''visChart.xml")