質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.50%
R

R言語は、「S言語」をオープンソースとして実装なおした、統計解析向けのプログラミング言語です。 計算がとても速くグラフィックも充実しているため、数値計算に向いています。 文法的には、統計解析部分はS言語を参考にしており、データ処理部分はSchemeの影響を受けています。 世界中の専門家が開発に関わり、日々新しい手法やアルゴリズムが追加されています。

プログラミング言語

プログラミング言語はパソコン上で実行することができるソースコードを記述する為に扱う言語の総称です。

Q&A

0回答

779閲覧

R言語の画像復元プログラムを解読したい

masa_0705

総合スコア9

R

R言語は、「S言語」をオープンソースとして実装なおした、統計解析向けのプログラミング言語です。 計算がとても速くグラフィックも充実しているため、数値計算に向いています。 文法的には、統計解析部分はS言語を参考にしており、データ処理部分はSchemeの影響を受けています。 世界中の専門家が開発に関わり、日々新しい手法やアルゴリズムが追加されています。

プログラミング言語

プログラミング言語はパソコン上で実行することができるソースコードを記述する為に扱う言語の総称です。

0グッド

0クリップ

投稿2019/11/16 05:31

R言語の画像復元プログラムの解読を行っているのですが、文中の(1),(2)式のように、要素が[i,j]から[i,j,1,1]へと変化した理由を教えていただきたいです。行パターンと列パターンの2系統が必要になったからだと考えているのですが、どうでしょうか。

R

1 2library(survey) 3library(imager) 4 5n <- 256 #64 6n2 <- n*n 7img = load.image("House256.jpg") #( "insects.jpg" ) 8grayimg = grayscale(img) 9subi<-imsub(grayimg,x>=90) 10subi<-imsub(subi,x<=256) 11subi<-imsub(subi,y>=100) 12subi<-imsub(subi,y<=256) 13#subi<-imsub(grayimg,x>= 101) 14#subi<-imsub(subi,x<=64) 15#subi<-imsub(subi,y>=141) 16#subi<-imsub(subi,y<=64) 17 18subih<-subi 19subiv<-subi 20rsubih<-subi 21rsubiv<-subi 22rsubi<-subi 23#plot(subi) 24H <- hadamard(n) 25T <- matrix(0, nrow=n, ncol=n) 26suim <- matrix(0, nrow=n, ncol=n) 27suiv <- matrix(0, nrow=n, ncol=n) 28suih <- matrix(0, nrow=n, ncol=n) 29rsuiv <- matrix(0, nrow=n, ncol=n) 30rsuih <- matrix(0, nrow=n, ncol=n) 31rsui <- matrix(0, nrow=n, ncol=n) 32 33for (i in 1:n){ 34 for(j in 1:n){ 35 if(H[i,j]==0) {T[i,j]=-1} else {T[i,j]=1} 36 (1)suim[i,j]=subi[i,j,1,1] 37 } 38} 39 40suiv = T %*% suim / n 41 42suih = t( T %*% t(suim) ) / n 43 44 45# Fukugen 46 47rsuiv = T %*% suiv 48 49rsuih = t( T %*% t(suih) ) 50 51rsui = (rsuiv+rsuih)/2 52 53for (i in 1:n){ 54 for(j in 1:n){ 55 (2)rsubi[i,j,1,1]=rsui[i,j] 56 } 57} 58 59#rsubi=(rsubiv+rsubih)/2 60

もととなる論文を見て考えているのですが、確信が得られませんでした。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

KojiDoi

2019/11/16 05:53

同じ内容の質問を何度も繰り返し投稿しないように。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだ回答がついていません

会員登録して回答してみよう

アカウントをお持ちの方は

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.50%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問