HTMLのcanvas要素にRでお絵描き

ブラウザによっては読み替える必要もあったと思いますが, 生物ですので最新の情報をお調べ下さい.

お品書き

bitops

CRANより普通にインストール

$ R -e 'install.packages("bitops",repos="http://cran.r-project.org")'

RAutoGenRunTime?

RAutoGenRunTimeから

$ wget http://www.omegahat.org/RAutoGenRunTime/RAutoGenRunTime_0.1-0.tar.gz
$ R CMD INSTALL RAutoGenRunTime_0.1-0.tar.gz

RGraphicsDevice?

RGraphicsDeviceから

$ wget http://www.omegahat.org/RGraphicsDevice/RGraphicsDevice_0.2-0.tar.gz
$ R CMD INSTALL RGraphicsDevice_0.2-0.tar.gz

canvastext.js

http://jim.studt.net/canvastext/からcanvastext.js をとってきます.

$ wget http://jim.studt.net/canvastext/canvastext.js

調理

作図

$ R -q
> library(RAutoGenRunTime)
> library(RGraphicsDevice)
> source("http://www.omegahat.org/RGraphicsDevice/Rjs.R")
> jsCanvas("hoge.js")
> pie(rep(1,n), labels="", col=rainbow(n), border=NA)
> dev.off()

HTML

hoge.jsを取り込んで, bodyのonloadイベントで, rdraw()を実行.

<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
<html> <head>
<script type="application/x-javascript" src="canvastext.js"></script>
<script type="application/x-javascript" src="hoge.js"></script>
<title>Example of the Canvas</title>
</head>
<body onload="rdraw()">
<canvas id="canvas" width="1000" height="800" >
No support for JavaScript canvas
</canvas>
</body>
</html>

注意

  • クオートのエスケープの処理に問題があります. 無理やりエスケープすると上手くいくかもしれません.
  • 日本語やシンボルは出ません.(英数字のみ)

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Google
WWW を検索 OKADAJP.ORG を検索
Last-modified: 2015-03-01 (日) 01:15:59 (1721d)