SE-1 の回答履歴

数IIIの積分で部分積分と置換積分の使いわけができません!! 先生に聞いたら 慣れるしかないかな と言われたのですが、本当にそれしかないのでしょうか 使いわけるコツとかあれば教えてください。 お願いします!!

Perl/TkでGUIプログラミングをしております。 プログラム中のButtonを押した時に自分のパソコンに設定している 既定のブラウザでWEBサイトを開くにはどうすればいいでしょうか？ イメージは下記のような感じです。 use Tk; use Encode; $url = "http://okwave.jp/"; $main->Button(-text=>decode("cp932","URLを開く"),-font => ["ＭＳ ゴシック", 12], -command => \&open_url) ->grid(-row=>0,-column=>0); sub open_url{ # 既定のブラウザでURL($url)を開く処理 } よろしくお願いします。

Perl/TkでGUIプログラミングをしております。 プログラム中のButtonを押した時に自分のパソコンに設定している 既定のブラウザでWEBサイトを開くにはどうすればいいでしょうか？ イメージは下記のような感じです。 use Tk; use Encode; $url = "http://okwave.jp/"; $main->Button(-text=>decode("cp932","URLを開く"),-font => ["ＭＳ ゴシック", 12], -command => \&open_url) ->grid(-row=>0,-column=>0); sub open_url{ # 既定のブラウザでURL($url)を開く処理 } よろしくお願いします。

Perlをもちいて塩基配列のチェックをおこないたいんですがどのようなプログラムを作成したらいいのかがわからないので教えてください。 以下の塩基配列のデータファイル(1)があります 塩基配列の説明文～ ５’-ATATAGATAGATCATAGATCCCCGATAGCCCAGTAAATGATGACCCGATGATGACCCAGTACCCGGATGAGTAGTGATAGTACCCGTGTGTAAGTGATAGATAGTCCCATGTAGACAAAGATCCAGTAACGCGCGTTTTT-３’ これに対し、制限酵素A、B、Cを含んだデータファイル(2)があります。 ファイル形式は以下のような内容です。 制限酵素の説明文～ <1>A（制限酵素名） <2> <3> <4> ５’-A＾TAGT-３’（認識部位） このデータファイル(1)に対し、(2)のファイル内の制限酵素A（認識部位５’-A＾TAGT-３’）で切断する位置の数、位置の場所を表す番号（塩基配列の中の何番目か）を表示させるプログラムを作りたいんですがどのようにしたらいいんでしょうか？ プログラムを実行する際には以下の手順を踏んでおこないます。 ./プログラムファイル名.pl 塩基配列ファイル名.fasta 制限酵素データファイル.txt 制限酵素名前（ここではAとする） これらをおこなうために必要な点として自分が考えているのは、(2)のファイル内の制限酵素名Aを認識させるために正規表現で<1>を認識させるようにして、実行時に指定する制限酵素名がなければそこでプログラムを終了させ、逆に存在する場合は、塩基配列を認識する部位である<4> ５’-A＾TAGT-３’（認識部位）の部分を読み込んで(1)のファイル内の塩基配列認識部位の数と位置を表示させるプログラムを組み込めばいいのではないかと考えているのですが、<1>A（制限酵素名）があった場合に<4> ５’-A＾TAGT-３’（認識部位）を認識させるためにはどうしたらいいんでしょうか？

Perlをもちいて塩基配列のチェックをおこないたいんですがどのようなプログラムを作成したらいいのかがわからないので教えてください。 以下の塩基配列のデータファイル(1)があります 塩基配列の説明文～ ５’-ATATAGATAGATCATAGATCCCCGATAGCCCAGTAAATGATGACCCGATGATGACCCAGTACCCGGATGAGTAGTGATAGTACCCGTGTGTAAGTGATAGATAGTCCCATGTAGACAAAGATCCAGTAACGCGCGTTTTT-３’ これに対し、制限酵素A、B、Cを含んだデータファイル(2)があります。 ファイル形式は以下のような内容です。 制限酵素の説明文～ <1>A（制限酵素名） <2> <3> <4> ５’-A＾TAGT-３’（認識部位） このデータファイル(1)に対し、(2)のファイル内の制限酵素A（認識部位５’-A＾TAGT-３’）で切断する位置の数、位置の場所を表す番号（塩基配列の中の何番目か）を表示させるプログラムを作りたいんですがどのようにしたらいいんでしょうか？ プログラムを実行する際には以下の手順を踏んでおこないます。 ./プログラムファイル名.pl 塩基配列ファイル名.fasta 制限酵素データファイル.txt 制限酵素名前（ここではAとする） これらをおこなうために必要な点として自分が考えているのは、(2)のファイル内の制限酵素名Aを認識させるために正規表現で<1>を認識させるようにして、実行時に指定する制限酵素名がなければそこでプログラムを終了させ、逆に存在する場合は、塩基配列を認識する部位である<4> ５’-A＾TAGT-３’（認識部位）の部分を読み込んで(1)のファイル内の塩基配列認識部位の数と位置を表示させるプログラムを組み込めばいいのではないかと考えているのですが、<1>A（制限酵素名）があった場合に<4> ５’-A＾TAGT-３’（認識部位）を認識させるためにはどうしたらいいんでしょうか？

Perlをもちいて塩基配列のチェックをおこないたいんですがどのようなプログラムを作成したらいいのかがわからないので教えてください。 以下の塩基配列のデータファイル(1)があります 塩基配列の説明文～ ５’-ATATAGATAGATCATAGATCCCCGATAGCCCAGTAAATGATGACCCGATGATGACCCAGTACCCGGATGAGTAGTGATAGTACCCGTGTGTAAGTGATAGATAGTCCCATGTAGACAAAGATCCAGTAACGCGCGTTTTT-３’ これに対し、制限酵素A、B、Cを含んだデータファイル(2)があります。 ファイル形式は以下のような内容です。 制限酵素の説明文～ <1>A（制限酵素名） <2> <3> <4> ５’-A＾TAGT-３’（認識部位） このデータファイル(1)に対し、(2)のファイル内の制限酵素A（認識部位５’-A＾TAGT-３’）で切断する位置の数、位置の場所を表す番号（塩基配列の中の何番目か）を表示させるプログラムを作りたいんですがどのようにしたらいいんでしょうか？ プログラムを実行する際には以下の手順を踏んでおこないます。 ./プログラムファイル名.pl 塩基配列ファイル名.fasta 制限酵素データファイル.txt 制限酵素名前（ここではAとする） これらをおこなうために必要な点として自分が考えているのは、(2)のファイル内の制限酵素名Aを認識させるために正規表現で<1>を認識させるようにして、実行時に指定する制限酵素名がなければそこでプログラムを終了させ、逆に存在する場合は、塩基配列を認識する部位である<4> ５’-A＾TAGT-３’（認識部位）の部分を読み込んで(1)のファイル内の塩基配列認識部位の数と位置を表示させるプログラムを組み込めばいいのではないかと考えているのですが、<1>A（制限酵素名）があった場合に<4> ５’-A＾TAGT-３’（認識部位）を認識させるためにはどうしたらいいんでしょうか？

GUIプログラミングを始めようと思い、Perlを少しかじっていることもあり、Perl/Tkを選びました。CentOS5にソース(Tk-804.027.tar.gz)からインストールを行い、オライリーの「入門Perl/Tk」に沿って勉強しています。 順調に各ウィジェットを使えていますが、Entryに関しては上手くいっていません。 以下のようなプログラムで問題が起こります。 01 #!/usr/bin/perl -w 02 03 use Tk; 04 05 $buffer = ""; 06 07 $top = MainWindow->new(); 08 09 $top->Entry( -textvariable => \$buffer )->pack(); 10 $top->Button(-text => "EXIT", -command => sub { exit　})->pack(); 11 MainLoop; 状況としては、9行目で作成されるエントリが文字入力を受け付けてくれないのです。 しかし、10行目のボタンを作成するプログラムを削除すると入力を受け付けてくれます。 widgetコマンドで見られるサンプルも一部は入力できますが、すべてのエントリに入力できるものはありませんでした。 どなたか原因のわかる方、よろしくお願いします。

GUIプログラミングを始めようと思い、Perlを少しかじっていることもあり、Perl/Tkを選びました。CentOS5にソース(Tk-804.027.tar.gz)からインストールを行い、オライリーの「入門Perl/Tk」に沿って勉強しています。 順調に各ウィジェットを使えていますが、Entryに関しては上手くいっていません。 以下のようなプログラムで問題が起こります。 01 #!/usr/bin/perl -w 02 03 use Tk; 04 05 $buffer = ""; 06 07 $top = MainWindow->new(); 08 09 $top->Entry( -textvariable => \$buffer )->pack(); 10 $top->Button(-text => "EXIT", -command => sub { exit　})->pack(); 11 MainLoop; 状況としては、9行目で作成されるエントリが文字入力を受け付けてくれないのです。 しかし、10行目のボタンを作成するプログラムを削除すると入力を受け付けてくれます。 widgetコマンドで見られるサンプルも一部は入力できますが、すべてのエントリに入力できるものはありませんでした。 どなたか原因のわかる方、よろしくお願いします。

perlでランダムな文字列を作成する簡単な方法はありませんか？ 文字数と文字種を指定できるとありがたいのですが。 $foo = hoge(8,'a-zA-Z0-9'); みたいな感じでできるといいのですが。 お願いします。

1092344 1320089 4780677 56064←Ｘとする 123098 5670989 以上のデータが含まれているファイルＡがあるとします。 上のデータに適する番号を持ったデータ（ここでは郵便番号に対する住所とします←全国の郵便番号ならびにそれに対応する住所が記載してあるデータファイルＢ）が存在していたら、7桁の場合はそのままで、5桁ならびに6桁では7桁のデータのうち該当するところがあれば（例としてＸの場合、56064??でも良いですし、??56064でも良いですし、?56064?でもいいです）抜き出して表示させるようなプログラミングを作りたいんですがどうしたらいいんでしょうか？ 初心者でして、わかりにくい質問のしかたですいません。

1092344 1320089 4780677 56064←Ｘとする 123098 5670989 以上のデータが含まれているファイルＡがあるとします。 上のデータに適する番号を持ったデータ（ここでは郵便番号に対する住所とします←全国の郵便番号ならびにそれに対応する住所が記載してあるデータファイルＢ）が存在していたら、7桁の場合はそのままで、5桁ならびに6桁では7桁のデータのうち該当するところがあれば（例としてＸの場合、56064??でも良いですし、??56064でも良いですし、?56064?でもいいです）抜き出して表示させるようなプログラミングを作りたいんですがどうしたらいいんでしょうか？ 初心者でして、わかりにくい質問のしかたですいません。

あるディレクトリの中に a.pl b.pl c.pl d.pl e.pl という５つのファイルが入っているとします．そのとき，一気にこの５つのファイルを実行するにはどうすればいいのでしょうか？ とても初歩的な質問かもしれませんがお願いします．実際は100個くらいファイルがあるのでひとつひとつ実行するのはとても面倒で．．．

統計についてはまったくの初心者で意味がわかりません。 こちらで回答されているのを見ていたのですが、よくわからないので質問させていただきました。 論文を提出するのに、Mann-Whitneyの検定を用いるのは上司より指導いただき わかったのですが、ソフトで出た語句について説明できません。 『平均ランク』と『順位和』はどういうふうに理解したらよいのでしょうか？？ その二つが出ることにより何を意味するのでしょうか？？ 　　　　　　 人数　 平均ランク　 順位和 グループA　　15 ___ 32.17___ 482.50 グループB　　26 ___ 14.56___ 378.50 合計　　　　 41 Mann-Whitneyの検定　p=0.000 論文提出の期限が迫っており大変困ってます。 すみませんが、回答宜しくお願いします。

PCが起動しなくなりました ファイル保存は無理でしょうか？ できるとしたその方法をわかりやすく教えてください よろしくお願いします

統計学でP値を求めるプログラムで、通常ならば、台形公式やシンプソン公式などを用いて、微小ずつ積分していくと考え作ってみたのですが、先生から毎回積分するのではなく近似値を出しておいて利用するようにと言われ、積分をしないプログラムを組めと言われています。 おそらく、積分はしたという前提で計算するという事でしょうか？ フリーの統計ソフトR　のコードを参考にと見ていたんですが理解し難く、どなたかにご教授願いたいと考えました。 よろしくお願い致します。 今回は、カイ二乗の値からP値を求めようと考えています。 その際の、カイ二乗分布に従う式は f(x) = x^(n-2/2) * e^(-x/2) / 2^(n/2)gamma(n/2) は分かりました。 ガンマ関数に関しては、 double gamma(double x, int *ier) /* ガンマ関数の計算 */ { double err, g, s, t, v, w, y; long k; *ier = 0; if (x > 5.0) { v = 1.0 / x; s = ((((((-0.000592166437354 * v + 0.0000697281375837) * v + 0.00078403922172) * v - 0.000229472093621) * v - 0.00268132716049) * v + 0.00347222222222) * v + 0.0833333333333) * v + 1.0; g = 2.506628274631001 * exp(-x) * pow(x,x-0.5) * s; } else { err = 1.0e-20; w = x; t = 1.0; if (x < 1.5) { if (x < err) { k = (long)x; y = (double)k - x; if (fabs(y) < err || fabs(1.0-y) < err) *ier = -1; } if (*ier == 0) { while (w < 1.5) { t /= w; w += 1.0; } } } else { if (w > 2.5) { while (w > 2.5) { w -= 1.0; t *= w; } } } w -= 2.0; g = (((((((0.0021385778 * w - 0.0034961289) * w + 0.0122995771) * w - 0.00012513767) * w + 0.0740648982) * w + 0.0815652323) * w + 0.411849671) * w + 0.422784604) * w + 0.999999926; g *= t; } return g; }

テキストを読んで既存のExcelに書き込む処理をしています。 実行時に「perl ruiseki2.pl 0528 42 49 200705」の様にパラメータ を指定して実行すると Win32::OLE(0.1701) error 0x800a03ec in METHOD/PROPERTYGET "Cells" at ruiseki2.pl line 382 Can't use an undefined value as a HASH reference at ruiseki2.pl line 382. の様なエラーが表示されます。 第二パラメータのみ、使用せずにプログラムで直接値をセットする と正常に処理されるのですが、パラメータの指定や使用方法に問題 があるのでしょうか？ご存知の方がいらっしゃいましたらお教え下 さい。下記がソースです。 #第二パラメータを変数にセット。ここは正常にセットされます。 $wk_i = $ARGV[1]; use Win32::OLE; eval {$ex = Win32::OLE->GetActiveObject('Excel.Application')}; die "Excel not installed" if $@; unless (defined $ex) { $ex = Win32::OLE->new('Excel.Application',sub {$_[0]->Quit;}) or die "Oops,cannot start Excel"; } $book = $ex->Workbooks->Open('C:/データ/レポートチェック'.$ARGV[3].'.xls'); $sheet = $book->Worksheets(1); ※エラー箇所(382行目) $sheet->Cells(3,$wk_i)->{Value} = $aaa; $book->SaveAs( 'C:/データ/レポートチェック'.$ARGV[3].'.xls' ); undef $book; undef $ex;

テキストを読んで既存のExcelに書き込む処理をしています。 実行時に「perl ruiseki2.pl 0528 42 49 200705」の様にパラメータ を指定して実行すると Win32::OLE(0.1701) error 0x800a03ec in METHOD/PROPERTYGET "Cells" at ruiseki2.pl line 382 Can't use an undefined value as a HASH reference at ruiseki2.pl line 382. の様なエラーが表示されます。 第二パラメータのみ、使用せずにプログラムで直接値をセットする と正常に処理されるのですが、パラメータの指定や使用方法に問題 があるのでしょうか？ご存知の方がいらっしゃいましたらお教え下 さい。下記がソースです。 #第二パラメータを変数にセット。ここは正常にセットされます。 $wk_i = $ARGV[1]; use Win32::OLE; eval {$ex = Win32::OLE->GetActiveObject('Excel.Application')}; die "Excel not installed" if $@; unless (defined $ex) { $ex = Win32::OLE->new('Excel.Application',sub {$_[0]->Quit;}) or die "Oops,cannot start Excel"; } $book = $ex->Workbooks->Open('C:/データ/レポートチェック'.$ARGV[3].'.xls'); $sheet = $book->Worksheets(1); ※エラー箇所(382行目) $sheet->Cells(3,$wk_i)->{Value} = $aaa; $book->SaveAs( 'C:/データ/レポートチェック'.$ARGV[3].'.xls' ); undef $book; undef $ex;

Perlを勉強しているのですが正規表現についてよくわからないので教えてください。 $text="【件名】本文" とあるときに、【】で囲まれた文字列（【】も含む）を抽出し、$textに戻したいのですがどうすればいいのでしょうか？ （$textの中身を【件名】としたいのです） よろしくお願いします。

Perlを勉強しているのですが正規表現についてよくわからないので教えてください。 $text="【件名】本文" とあるときに、【】で囲まれた文字列（【】も含む）を抽出し、$textに戻したいのですがどうすればいいのでしょうか？ （$textの中身を【件名】としたいのです） よろしくお願いします。

わからないんです。 教えてください。 sinθ＜tanθ　 0≦θ≦2π　の不等式を解きなさい。 って問題です。 sinθ＜sinθ/cosθ・・・というのは間違ってますか。