ベストアンサー

Matlabでforやifを使わずに条件に合う行番号の抜き出し方

2009/07/29 09:18

仮にA=[1 0 1 0 0 1]の行ベクトルがあったとします。 forやifを使わずにAにおいて1が入っている行番号（この場合では1，2，5）を抜き出すにはどうしたらいいのでしょうか。よろしくお願いします。

megusurino
お礼率100% (2/2)

その他（プログラミング・開発）
回答数1
ありがとう数2

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

sgwjn
ベストアンサー率70% (47/67)

2009/07/29 23:47 回答No.1

index = find(A == 1); で大丈夫かと。

質問者

お礼 2009/07/30 06:59

迅速なご回答どうもありがとうございます。

関連するQ&A

行を削除しても番号の変わらない方法

エクセルで３００行の表を作っています。 A列に１行づつ１～３００まで番号をつけているのですが、仮に１００番のデータを行ごと削除したあと、番号が飛ばず、元通りに１～２９９に自動で詰めてくれる方法はありますか？よろしくお願いします。
pythonのif for文の処理を複数行書きたい

C言語などはfor if文を使うとき if(条件式){ 処理 } for(条件式){ 処理 } など中括弧を使いますが、 pythonはカッコを使わず for 条件式: 処理などと、中括弧を使いません。しかし for 条件式: 処理１、処理２，処理３… などと言った処理を書くと、処理１だけがループされ、 if 条件式: 処理１、処理２，処理３… だと、処理１だけがifの対象になりますよね処理１，２，３すべてがforやifの対象になるにはどういう書き方をすればいいんでしょうか。「for if 複数行処理」などで検索しても、or andなど複数条件などがヒットして中々探せません
MATLABでの、1行完結のIF文の書き方について教えてください。

MATLABでの、1行完結のIF文の書き方について教えてください。 if (i==1);data(~test1 | test2>10) = -9; end の一文で、iが　"8"　になったときにのみ、ここでエラーが発生してしまいます。この文の意味は「test1ではない　または　test2が10より大きい　場合、dataに-9を代入する」だと理解しています。 test1は、test1＝（test0<100)；という一文の結果が入っています。実際には test1 ===> 100*100 logical　（100より大きいので、FALSE） test2 ===> 200*200 double が入ります。 if (i==1);data(test0>100 | test2>10) = -9; end と書き直して、両方　double　にしてもやはりエラーになりました。条件を複数記述する書き方が間違っているのでしょうか。いろいろ試したもののうまくいかず困っています。アドバイスをいただけましたら助かります。宜しくお願い致します。
DOSコマンドのforで空白行をスキップしない

DOSコマンド（バッチ）で、ファイルの４行目から読み込んで順に処理し、空白行が見つかったらそこで処理ループを抜けて処理を終了させたいのですが、 FOR /Fは空白行を読み飛ばしてしまうため、やりたい事ができません。 FOR /F "SKIP=4" %%A IN (file) DO ( IF "%%A" == "" GOTO :OUT ・・・処理・・・ ) :OUT forで空白行をスキップしないようにするか、代替法があれば教えていただけないでしょうか。よろしくお願いいたします。
Calcで行を挿入した時に行番号がずれる

Open OfficeのCalcで商品の管理をしています。それぞれの行の先頭には商品の通し番号を表示するセルがあります。これは商品名を入力すると自動で表示されるようになっています。例えば、2商品目であると「=IF(B2="","",A1+1)」という式が入っています。つまり、2行目の商品名が空の時は、何も表示していなくて、商品名を入力すると上の行の商品番号+1が自動で表示されるという式です。問題なのは、時々入力し忘れた商品を後から行を増やして挿入したいという場合です。行の挿入をすると、この商品番号が飛んでしまいます。今の解決策としては、商品番号の一番上の式を一番下までコピーし直すことで解決しています。しかし、行の数が増えるに従ってこの作業が非常に面倒になります。何とか行を増やしても商品番号の数式が狂わない方法はないでしょうか？よろしくお願いいたします。
条件による行挿入VBAの統合

Bookごとのデータの内容により次の３つをその都度使い分けていますがこれをひとつのVBAに統合したいのですが書き方を教えてください。 (当方詳しくないのでこのVBAも教えられたままのもので自作ではありません） ※A列データのうちタイトル行には■を先頭に入れてあります。 ●「■」があればすべて分割（■タイトルの上の行に１行挿入） Sub 全分割() Dim r As Long For r = 140 To 2 Step -1 If InStr(Cells(r, "A").Value, "■") > 0 Then Rows(r).Insert End If Next End Sub ●タイトルに(1)または(2)が含まれる場合は (1)の上で分割（■の上の行に１行挿入）、(2)のあるA列はセル消去 Sub かっこ２有り分割() Dim r As Long For r = 140 To 2 Step -1 If InStr(Cells(r, "A").Value, "■") > 0 Then If InStr(Cells(r, "A").Value, "(2)") > 0 Then Cells(r, "C").ClearContents End If If InStr(Cells(r, "A").Value, "(1)") > 0 Then Rows(r).Insert End If Cells(r, "A").ClearContents End If Next End Sub ●上記混在の場合（かっこありタイトルとかっこなしタイトルが混在) Sub 混在分割() Dim r As Long For r = 140 To 2 Step -1 If InStr(Cells(r, "A").Value, "■") > 0 Then If InStr(Cells(r, "A").Value, "(2)") > 0 Then Cells(r, "A").ClearContents End If If InStr(Cells(r, "A").Value, "■") > 0 Then Rows(r).Insert End If End If Next End Sub ※かっこ有りに(3)もある場合、(2)と同じ処理３つを統合した場合の分類のルール A列に■のあるタイトルの処理 ■のあるタイトルごとにタイトルの上に1行挿入ただしタイトルに(2)(3)が含まれる場合は、上に行挿入せずそのタイトル部分(A列)のセル消去 A列の状況 ■タイトルデータ1 データ2 データ3 ■タイトル(1) データ1 データ2 データ3 ■タイトル(2) データ4 データ5 データ6 ■タイトルデータ1 データ2 データ3 A列の処理状況 (行挿入) ■タイトルデータ1 データ2 データ3 (行挿入) ■タイトルデータ1 データ2 データ3 (空白) データ4 データ5 データ6 (行挿入) ■タイトルデータ1 データ2 データ3 なおデータの数字（連番)はD列に入れてありますが、上記ルールにより■のあとや(2)(3)のとき同一タイトルなら連番にしてあるのでこの1の行を分割の判定としてもいい Office2013/Windows7
matlabで複数条件のif文を行列計算で行うには？

matlabで複数条件のif文を行列計算で行うには？ matlabではfor文などは行列計算で回したほうが高速化できると聞きました。 for文でのやりかたはわかったのですが、複数条件でのif文ではどのように書けばよいのでしょうか？自分のプログラムは以下のようなものです for i=1:100 for j=1:100 theta_kari=atan(abs(B(j,i))/abs(A(j,i))); if A(j,i)>=0&&B(j,i)>=0 theta(j,i)=theta_kari; elseif A(j,i)<0&&B(j,i)>=0 theta(j,i)=theta_kari+(pi/2); elseif A(j,i)<0&&B(j,i)<0 theta(j,i)=theta_kari+pi; elseif A(j,i)>=0&&B(j,i)<0 theta(j,i)=theta_kari+(pi/2*3); end end end よろしくお願いします
【ExcelVBA】IF条件を満たしているのに、IF条件のところで止まってしまう

Sub test1() 変数1 = IsEmpty(Range("C1")) If Range("A1") > 0 And Range("B1") = 0 And 変数1 = True Then 　　test2 End If End Sub 止まったときのデバッグでの表示は Range("A1")は「100」(セルの中身) Range("B1")は「0」(セルの中身) 変数1はRange("C1")がエラー表示なので「True」すべての条件を満たしているのですが、 IF条件のところで止まってしまいます。 (IF条件のところの1行が黄色くハイライトになっている状態) 止まったデバッグの後に、F5を押して実行させると、 IF条件の続きから実行されて、test2が実行されて処理が終了します。何で、IF文のところで一度止まってしまうのかわかりません。
条件によって行削除を繰り返し処理する

一行目がフィールド名で、Z列まで値の入っているデータがあります。 x列が""の場合はその行を削除する処理を最終行まで続けたいのですが、 ""行が２行以上続いているとFor～によって行を飛ばしてしまいます。何か良い方法はありませんでしょうか？ Sub 削除() Dim last As Long Dim row As Long last = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).row For row = 2 To last If Cells(row, 24).Value <> "" Then Rows(Format(row) + ":" + Format(row)).EntireRow.Deletesift:=xlUp End If Next End Sub
エクセル　IF関数　条件を満たす行に印をつける

A1：J30までにランダムな数値が入力されている表があります。M1:N4には検索値を入力できる箇所があり、条件に該当する行があればK列に○を付ける、ということがしたいです。その条件は、 (1)M1かN1に該当する (2)M2かN2に該当する (3)M3かN3かM4かN4に該当するこの３条件のすべてを満たす行があればK列に○です。いろいろ調べて、IF関数とsumproductを組み合わせてやってみたのですが、正しい結果にならずお手上げ状態です。（ちなみにこれ↓長すぎなのもネック。。。） =IF(AND(SUMPRODUCT((A1:J1=$M$1)+(A1:J1=$N$1))>=0,SUMPRODUCT((A1:J1=$M$2)+(A1:J1=$N$2))>=0,SUMPRODUCT((A1:J1=$M$3)+(A1:J1=$N$3)+(A1:J1=$M$4)+(A1:J1=$N$4)>=0)),"○","") IF関数でなくてもできれば何でも良いので、教えてください。よろしくお願いいたします。
E列が空白のとき、その空白行を削除し、番号を振り直す

windows7　Excel2003でマクロ勉強中です。あるサイトにE列が空白のとき、その空白行を削除し、番号を振り直すというコードがありました。自分で作った表（表の最上段の２行は項目名が入っています。）で　実行すると「Rangeメソッドは失敗しました。Globalオブジェクト」とエラーが出ます。エラーはでますが、処理自体は正しく実行されます。このエラーの原因と回避するにはどうしたらよろしいでしょうか。 Sub E列が空白のとき、その空白行を削除し、番号を振り直す() Dim i As Long, j As Long '行削除の処理 For i = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1 If Range("A" & i).Value <> "" And IsNumeric(Range("A" & i).Value) = True Then If Range("E" & i).Value = "" Then Rows(i).Delete End If End If Next '番号振りなおし処理 '’’Range("A" & Rows.Count).End(xlUp).Offset(1).Select For i = 0 To Range("A" & Rows.Count).End(xlUp).Row If Range("A" & i).Value = "番号" Then j = 1　・・・・・ここでエラー発生 If Range("A" & i).Value <> "" And IsNumeric(Range("A" & i).Value) = True Then Range("A" & i).Value = j j = j + 1 End If Next ActiveSheet.Protect End Sub
エクセル関数内の行番号を同じにしたい。

A列にYesかNoを選ぶセルがあり、Yesの場合は、隣の列（B列）に "ここをクリック" という文字列を出し、別シートの同じ場所に飛び、そして、Noの場合は、隣の列（B列）に "OK"という文字列を出して終わり。ということがやりたいです。１．B1に以下の関数を入力しました。 =IF(A1="Yes", HYPERLINK("#sheet2!A1","こちらをクリック"),IF(A1="No","OK"," ")) ２．これをコピーしてB2以下に反映しようと考えました。ですが、リンク先の"#sheet2!A1"のA1の行番号が以下のように、増えてくれません。 =IF(A2="Yes", HYPERLINK("#sheet2!A1","こちらをクリック"),IF(A2="No","OK"," ")) ３．コピーするだけで、"#sheet2!A1"の部分のセルが１つ繰り上がるように（この場合、A1からA2に）するには、どのようにしたらいいのでしょうか？４．３．が出来ない場合、何か他の方法を教えて頂きたく。５．当方、VBAの知識がないので、マクロを組みたくても組めないのが現状です。以上よろしくお願いします。
条件に合った最初の行番号を表示したい。

ｅｘｃｅｌで、Sheet1に、Aに丁目、Ｂに番地、Ｃに号を割り振りました。　 A　 B 　C 1 　1 　1 　15 2 　1 　1 　18 3 　1 　1 　21 4 　1 　2 　7 5 　1 　2 　14 6 　2 　1 　33 7 　2 　1 　36 8 　2 　1 　37 9 　3 　1 　 15 そこで、条件に合った最初の行番号を表示したいのです。例えば、２丁目１番地の最初は、６行目なので、F1などに６と表示する方法を知りたいのです。１丁目２番地だったら、F1は４になるようにしたいのです。よろしくお願いします。
matlabのfor文について

matlabについて基本的な質問があります．たとえば a1 = 11 a2 = 32 a3 = 53 a4 = 63 for i = 1:length(a1) ○○○ end for i = 1:length(a2) 　○○○ end for i = 1:length(a3) 　○○○ end for i = 1:length(a4) 　○○○ end の時に，for文を一つにまとめるにはどうすればいいですか？
EXCELの行番号取得について

Ａ列に●がランダムに入っている状態で、1番目に●が入っている行番号、2番目に●が入っている行番号、3番目・4番目・・・の行番号を関数で取得したいのですが、良い方法はありますでしょうか。ご教授下さい。（バージョンはEXCEL2016です）よろしくお願いします。　　A列　　　　B列 1　　　　　　　　4　　←　1番目の●の行番号 2　　　　　　　　6　　←　2番目の●の行番号 3　　　　　　　　9　　←　3番目の●の行番号 4　　● 5 6　　● 7 8 9　　●　
EXCEL-VBAでワークシートのデータがはいっている最終の行番号の取得

ExcelVBAは不得意のものです。ワークシートのＡ列にデータが入っているのですが、10行目までの時もあれば20行目までデータが入っている場合もあります。データが入っている最終行の行番号を取得したいのですがどうしたら良いのでしょう。何をするかというと、その番号を取得してループ処理をしたいのです。For i=1 To 最終行の行番号みたいに多分EOFなんて指定じゃないですよね
EXCELの行番号、列番号の大きさ！

EXCELで列番号A、B・・・行番号１、２、３の文字の大きさが、EXCELのファイルによって違います。印刷しようとしても同じ設定なのに若干ずれています。違うところといえば、その列番号、行番号の文字の大きさです。直すにはどのようにしたらよいのか教えてください！
行番号を取得するには？

SELECT文一回で行番号を取得したいのですがうまい方法が見つかりません、もしよい案があれば教えてください。 SELECT　行番号,FIELD FROM TABLE_A やりたいことは最終的にCASE文を使って例えば５行目だけNULLにしたりしたいんです。
Excelの連続番号（行を入れ替えても。抜けがあっても。）

ExcelのシートのA列には、番号が連続して上から下へ付いています。 A10は1 A11は2 A12は3 ・・・という感じ。ただし、A列の番号がぬけている行があります。（小見出しみたいな行） A13は4 A14は5 A15とA16は番号が抜けている A17は6 A18は7 ・・・番号が抜けている行は、２行連続しているかもしれませんし、単独かもしれません。「切り取り」「切り取ったセルの挿入」等を使って行をどのように入れ替えても番号が上から下へ連続して（ただし番号の抜けている行は抜けたまま）にしたいのですが、どうすればよいでしょうか。私がとりあえず考えたのは、 A10は　1 A11は　=A10+1 A12は　=A11+1 ・・・ A15は　=A14+0 A16は　=A15+0 ・・・のようなものなのですが、どうもうまくいきません。
条件分岐(if)について

条件分岐(if)についてお聞きしたことがあります。例えば if($a == 'A' || $a == 'B'){ 処理 }else if($a == 'C' || $a == 'D' || $a == 'E'){ 処理 }............... といった条件分岐があったとて、お聞きしたいことが2点あります。・条件分岐この後も数十個続いたとします。その場合もelse ifで一つ一つ条件を書かなければならないのでしょうか？・条件式if($a == 'A' || $a == 'B'....)が長くなる場合プログラムが見にくくなるので別途に条件式を書いておいてif文の所では($a == ◯)といったように簡潔に書くことはできないのでしょうか？宜しくお願いします。

Matlabでforやifを使わずに条件に合う行番号の抜き出し方

質問者が選んだベストアンサー

お礼 2009/07/30 06:59

関連するQ&A

行を削除しても番号の変わらない方法

pythonのif for文の処理を複数行書きたい

MATLABでの、1行完結のIF文の書き方について教えてください。

DOSコマンドのforで空白行をスキップしない

Calcで行を挿入した時に行番号がずれる

条件による行挿入VBAの統合

matlabで複数条件のif文を行列計算で行うには？

【ExcelVBA】IF条件を満たしているのに、IF条件のところで止まってしまう

条件によって行削除を繰り返し処理する

エクセル　IF関数　条件を満たす行に印をつける

E列が空白のとき、その空白行を削除し、番号を振り直す

エクセル関数内の行番号を同じにしたい。

条件に合った最初の行番号を表示したい。

matlabのfor文について

EXCELの行番号取得について

EXCEL-VBAでワークシートのデータがはいっている最終の行番号の取得

EXCELの行番号、列番号の大きさ！

行番号を取得するには？

Excelの連続番号（行を入れ替えても。抜けがあっても。）

条件分岐(if)について

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

Matlabでforやifを使わずに条件に合う行番号の抜き出し方

質問者が選んだベストアンサー

お礼 2009/07/30 06:59

関連するQ&A

行を削除しても番号の変わらない方法

pythonのif for文の処理を複数行書きたい

MATLABでの、1行完結のIF文の書き方について教えてください。

DOSコマンドのforで空白行をスキップしない

Calcで行を挿入した時に行番号がずれる

条件による行挿入VBAの統合

matlabで複数条件のif文を行列計算で行うには？

【ExcelVBA】IF条件を満たしているのに、IF条件のところで止まってしまう

条件によって行削除を繰り返し処理する

エクセル IF関数 条件を満たす行に印をつける

E列が空白のとき、その空白行を削除し、番号を振り直す

エクセル関数内の行番号を同じにしたい。

条件に合った最初の行番号を表示したい。

matlabのfor文について

EXCELの行番号取得について

EXCEL-VBAでワークシートのデータがはいっている最終の行番号の取得

EXCELの行番号、列番号の大きさ！

行番号を取得するには？

Excelの連続番号（行を入れ替えても。抜けがあっても。）

条件分岐(if)について

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

エクセル　IF関数　条件を満たす行に印をつける

カテゴリ
一覧

専門家に質問してみよう
専門家登録