WordPressの使用法:RとPythonをブログに埋め込む

RとPythonのプログラムをWordPressのブログで実行できるようになりました。

逆にR-Fiddleのサービスはなくなるようです。既存のものは作動するとありあすが、日本語が入っていたものは表示されません。

そのかいわり、ウィジェットが公開されました。R-Fiddleと同様のスクリプトが実行されるようですが、日本語には対応してません。

ウィジェットはRを実行できるだけではなく、インターアクティブな練習問題をページにうめこうことができます。

今回はRの単純なプロットの練習問題を作成しました。手順は下記です。

 

1.DataCamp Light WordPress Pluginのインストール

 

下記に従いzipファイルをダウンロードし、WordPressにインストールします。

 

DataCamp Light WordPress Plugin

 

2.練習問題の作成

 

ブログの書き込みボックスの上部の”Add Exercise”をクリックし、練習問題、解答などを書き込みます。

“script.R”に正解を書き入れて”Run”するとグラフが描かれます。改行がうまくいかない場合は、text表示にして書き直すと良いようです。

“Hint”をクリックすると、あらかじめ書いたヒントが表示され、”Solution”「正解」タブも表示されます。

何も書かずに”Run”をクリックするとPre Excercise codeで書いておいてスクリプトが実行されます。下の練習問題の場合は、下のコードが実行され、コンソールにグラフが描かれます。

 t <- seq(from = 1, to = 100, by = 1) +10 + rnorm(100, sd = 7)
plot(t) 

# give 100 random numbers t <- seq(from = 1, to = 100, by = 1) +10 + rnorm(100, sd = 7) # plot t plot(t) # sample script is t <- seq(from = 1, to = 100, by = 1) +10 + rnorm(100, sd = 7) # create a variable t2, give 200 random numbers # plot t2 # sample script is t <- seq(from = 1, to = 100, by = 1) +10 + rnorm(100, sd = 7) # create a variable t2, give 200 random numbers t2 <- seq(from = 1, to = 200, by = 1) +10 + rnorm(200, sd = 7) # plot t2 plot(t2) test_object("t2") test_function("plot") success_msg("Great Job")
Think it aloud!

 

Please follow and like us:

About shibatau

I was born and grown up in Kyoto. I studied western philosophy at the University and specialized in analytic philosophy, especially Ludwig Wittgenstein at the postgraduate school. I'm interested in new technology, especially machine learning and have been learning R language for two years and began to learn Python last summer. Listening toParamore, Sia, Amazarashi and MIyuki Nakajima. Favorite movies I've recently seen: "FREEHELD". Favorite actors and actresses: Anthony Hopkins, Denzel Washington, Ellen Page, Meryl Streep, Mia Wasikowska and Robert DeNiro. Favorite books: Fyodor Mikhailovich Dostoyevsky, "The Karamazov Brothers", Shinran, "Lamentations of Divergences". Favorite phrase: Salvation by Faith. Twitter: @shibatau

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.