締切済み

[Fortran]文字列の並べ替え方法

2020/07/14 11:01

Fortranで以下のような文字列を使いやすい形に並べ替える方法を教えてください。（元） x1_y1 x2_y2 x3_y3 ... （変更後） x1_y1_x2_y2_x3_y3 x4_y4_x5_y5_x6_y6 x7_y7_x8_y8_x9_y9 ...

hizanov
お礼率0% (0/1)

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

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

みんなの回答

f272
ベストアンサー率46% (8532/18264)

2020/07/15 15:37 回答No.1

「以下のような文字列」というのがよくわからん。文字列の仕様をはっきりさせてほしい。基本的には，元データを読んで，文字列として保存して，その文字列を成型して，変更後のデータを出力する，ということを繰り返せばよい。

関連するQ&A

2つの文字列を比較する方法

二つの文字列を比較して違う箇所を発見したとき何らかの処理を行うようなプログラムを書きたいのですが、私の想像力が貧困な為そのアルゴリズムを考え付く事ができませんどなたか知恵を貸していただけないでしょうか？具体的には以下のようなことをやっています。私は現在,変数で var exStr1="||||||||||+|1|2|3|4|5|6|7|8|9|+||||||||||"; var exStr2="||2||||||||+|1||3|4|5|6|7|8|9|+||||||||||"; と宣言しているとき私は exStr1とexStr2では文字列の何処が違うか知る処理を知りたいのです。とりあえず今私は変数X1とX2に X1 = exStr1.split("+"); X2 = exStr2.split("+"); として「+」を区切り文字にして配列に入れてみて更にソレを「｜」で区切りなおしてみてます。 for(i=0;i<10;i++){ 　　Y1 = X1[i].split("|"); 　　Y2 = X2[i].split("|"); } そこで違う場所を探すための処理として私は以下のように書いて見ました。しかし現在全然動いてくれません。 for(i=0;i<10;i++){ 　　if(X1[i] != X2[i]){ 　　　　for(j=0;j<4;j++){ 　　　　　　if(Y2[j] != Y1[j] && Y2[i]==""){ 　　　　　　　　//ここで何らかの処理をしたい。しかし今はif文の条件がおかしいのか、この行の処理に入らない。　　　　　　} 　　　　} 　　} } う～。なんか質問の域を越えてるとも思いますし、それに我ながら質問の意味がわかりづらいとは思うのですがお願いします。なんらかのヒントのようなものでも頂けたら幸いです。
BLOCK構造体とFORTRAN

fortranでプログラムを組むことになったのですが、これまでプログラムを組んだことがなかったので困っています。 gridgenで作成した.grdファイルをfortranで読み込ませることがうまくできません。原因は、.grdのフォーマットがBLOCK構造体であるからだと考えています。 POINT構造体なら読み込めることが分かっているのですが…。そこで質問です。 BLOCK構造体である「.grd」ファイルを読み込み、POINT構造体の「.dat」ファイルを出力するプログラムをfortranで組むにはどうしたらいいですか？ BLOCK構造体とは以下の形式。 X1 X2 X3 X4 X5 …Xn Y1 Y2 Y3 Y4 Y5 … Yn Z1 Z2 Z3 Z4 Z5 … Zn POINT構造体は以下。 X1 Y1 Z1 X2 Y2 Z2 X3 Y3 Z3 X4 Y4 Z4 X5 Y5 Z5 … … … Xn Yn Zn
Ｃ＃で文字列の置換えをするには？

お世話になります。Ｃ＃で文字列の置換えに悩んでいます。このAの文字列の各項目に値を入れていきたいのですが方法がわかりません。具体的には、　A = "x__y__z__" があり、それぞれのx、y、zに値を入れます。例えば、　X = "12" 　Y = "34" 　Z = " 1" があり、結果的には　A = "x12y34z 1" なるようにしたいのです。最初は　A = "x" + X + "y" + Y + "z" + Z を考えていたのですが、そうではなくて左から2カラム目と3カラム目の間にXを・・・というような感じにしたいのです。そこで皆様の知恵を拝借したいと思っています。どういうコマンド（関数？）を使えば良いのでしょうか？
FORTRANのプログラミングについて

たびたび申し訳ありません。またFORTRANに関しての質問です。 x y z 0 0 30 1 0 45 2 0 60 3 0 43 4 0 51 5 0 32 0 1 43 1 1 90 2 1 32 3 1 85 4 1 65 5 1 90 0 2 32 1 2 32 と続くファイルがあります。これをFORTRANをで書き換えて、 0 0 30 0 1 43 0 2 32 1 0 45 1 1 90 1 2 32 と続くデータにしたいのです。（これを以下目的のファイルという）今のところ、次のようなプログラムを書き、特定のXに対しては、結果を吐き出すことに成功しています。 program dat real x1(100),h,y2(100),y1(100),z1(100) integer i,n,j,k,l,m,a(100) open(7,file='test.txt') open(9,file='af-test.dat') do i=1,100 read(7,*,end=200) x1(i),y1(i),z1(i) if(x1(i).eq.90)then write(9,*) x1(i),y1(i),z1(i) end if end do 200 close(7) close(9) end ここまではうまくいくのですが、これでは９０以外の場合は出力されません。（あたりまえですが）特定のXに限らずに例えばXを０から１００まで吐き出されるような目的のファイル作るにはをどのようにしてプログラムを書けばいいかご教授ください。
FORTRAN90

fortran90で、ファイル出力をフォーマット付きで行いたいのですが、 write(unit,****) のような文で、****の部分のフォーマット指定をマニュアルで入力するのではなく、その場に応じた形で指定する方法はありますでしょうか？ character変数の文字にフォーマット指定の文字列、例えば六つの実数を横一列に書き出す場合を想定して write(char,"(A,I1,A)")"'(",Int,"D13.5)'" とし、 write(unit,char)x,y,z,w,s,t などとするのはできませんでした。ここでいうintの部分を自動的に変えれるようにしたいのですが何か策はありますでしょうか？わかりにくい説明ですみませんが宜しくおねがいします。
Fortran でのマイナス乗数の書き方

Fortranで、マイナスの乗数の書き方についてお尋ねします。 cosθのマイナス1乗をプログラムで表したいのですが、どのように書けばいいでしょうか。実際に行いたい計算は、経緯度の２点間の距離で、下記のように記述してみましたが行最後の**-1でエラーがでています。 Fortran記述式２点間距離　= r*（cos(sin(y1)*sin(y2)+cos(y1)*cos(y2)*cos(x1-x2))）**-1) 計算したい式２点間距離　= rcos^-1(siny1siny2+cosy1cosy2cos(x1-x2)) Fortran　ｖ4.1.2（g95 0.93)を使用しています。初歩的なこととは存じますが、よろしくお願いいたします。
ゼロを含む文字列の連結方法

初歩的な質問かもしれませんが、お願いします。ゼロが連続する文字列を連結させて、ひとつの文字列にしたいのですが、strcpyとstrcatの組み合わせでは、00があった時点でこの部分が抜けてしまいます。ゼロを含む完全な形で連結する方法をお願いします。例：文字列A:「0001」と文字列B:「0055」と文字列C：「00AA」を連結して、文字列X：「0001005500AA」を作りたいのです。
文字列の入れ替え

2つのchar型配列x[],y[]に格納された文字列を入れ替えるプログラムを作成せよ。ただし入替え処理には、関数swap_array(char [],char [])を作成して用いること。という問題なのですが、下記の実行例では、2つの文字列xとyをキーボードから入力し、入れ替えた後に表示している。＜実行例＞ % ./irekae 文字列x (20字まで)? Mojiretsu 文字列y (20字まで)? Irekae 関数swap_array()を呼び出しました入替後の x: "Irekae" 入替後の y: "Mojiretsu" % となっているのですが文字列を格納するところまでしかわかりません。どなたか教えていただけないでしょうか？ #include<stdio.h> int main(void) { char x[21]; char y[21]; printf("文字列 (20字まで)? "); scanf("%s", x); printf("文字列 (20字まで)? "); scanf("%s", y);
秀丸の置換で/*コメント文字列*/"を削除したい。

秀丸の置換の方法を教えて頂きたく質問させて頂きます。次の文字列がテキストファイルの一行分です。 {{'\x0e', 9, 16},{0x00,0x00, /* ................ */0x03,0x00, /* ......%%........ */0x1D,0x00, /* ...%%%.%........ */0x11,0x00, /* ...%...%........ */0x13,0x00, /* ...%..%%........ */0x1D,0x00, /* ...%%%.%........ */0x11,0x00, /* ...%...%........ */0x11,0x00, /* ...%...%........ */0x11,0x00, /* ...%...%........ */0x13,0x00, /* ...%..%%........ */0x17,0x00, /* ...%.%%%........ */0x36,0x00, /* ..%%.%%......... */0x70,0x00, /* .%%%............ */0x60,0x00, /* .%%............. */0x00,0x00, /* ................ */0x00,0x00 /* ................ */}}, この文の中の/*から*/のコメントの文字列を削除して {{'\x0e', 9, 16},{0x00,0x00,0x03,0x00,0x1D,0x00,0x11,0x00,0x13,0x00,0x1D,0x00,0x11,0x00,0x11,0x00,0x11,0x00,0x13,0x00, 0x17,0x00,0x36,0x00,0x70,0x00,0x60,0x00,0x00,0x00,0x00,0x00}}, このような文字列にしたいのですが、どのようにすればよいか、どうぞご教授のほどよろしくお願い致します。
C言語　プログラミング　文字列

ある文字列X,Yがあるとき、XにYの文字列が含まれているかを検索する関数を作りたいんです。 Xを１文字ずつ、yと比較して行く感じなのはわかるんですが、うまく作ることができません。。どなたかお願いします！
エクセルで特定文字列の抽出する方法を教えてください。

エクセルで特定文字列の抽出する方法を教えてください。たとえばG00X-483.931Y-412.2R5.0 と書かれてるセルからXの値「-483.931」だけを抽出したいのですが分からなくて困ってます。またこの数値は8文字と決まってないのでＸ～Ｙの間の数値と言う感じで抽出したいです。よろしくお願いします。
Fortranで文字の読み込み＆書き込み

こんばんは。 FORTRANでとあるデータを処理しているのですが、そこでひとつ分からないことがあるので質問します。ご存知の方、ご教示願えないでしょうか。以下、質問内容 ------------------------------------ 「aaaa_50」という文字列から、「_50」のみの文字列を抜き出したい。具体例から説明しますと、 1 parameter A 2 read (10,*) A <-- Aは「aaaa_50」という文字列。 3 write (10,*) A <-- このままでは「aaaa_50」を書き込みます ------------------------------------ 確か2行目と3行目の間に何らかの処理を書けば「_50」の文字列が表現出来たと思うのですが・・・説明も分かりにくいかもしれませんが宜しくお願いいたします。
文字列と整数型について

はじめまして。どうしても困っているのでヒントでも良いのでおねがいします。関数内(func1)で確保した文字列変数のポインタを別の関数(func2)にポインタ渡しします。 func2内で整数型で計算した結果を引数で示された文字列変数に代入するというようなことをしたいと思ってます。ここで、intは4byteとします。メモリ長だけで見ると、bit[4] = tmp です。 void func1(){ char bit[4]; func2(bit); return; } void func2(char* p){ int tmp = 0x10101100; p = tmp; <---- ??? return; } そこでどのようにすれば、代入することができるのか分かりません。以下のような結果になるように代入したいと思っています。 bit[0] = 0x10; bit[1] = 0x10; bit[2] = 0x11; bit[3] = 0x00; 小さな文字列型に整数型をどのように渡せばよいのかが一番疑問に思っているところです。整数型に文字列型を代入する場合には文字列のバイト指定とシフト演算で実現できています。ヒントでもよいのでお願いします。
awkで最後の列だけ除外する方法

「awkのみ」で最後の列だけを区切り文字も含めて除外するのに、スマートな方法は無いでしょうか？ x1,x2,x3,…,x98,x99,x100 を x1,x2,x3,…,x98,x99 とする方法です。 $ awk {$100="";print $0} だと最後のカンマが残りますし、かといってprint $1, $2,…$98, $99 はダサいのでやめたいのですが・・・
行列　行ベクトル　列ベクトル　について

行列は見方を変えるとベクトルの集まりだと考える事ができると思います。質問なのですが、 X=（x1,x2） Y=（y1,y2）というベクトルを行列として見ると、（x1 x2）（y1 y2）のように表されると思います。ここで質問なのですが、行列は、行ベクトルを縦に並べたもの、又は列ベクトルを横に並べたものと説明がありました。列ベクトルとはXベクトルを（x1）（x2）と表したベクトルだと理解しています。テキストにもこのように記載されています。列ベクトルを横に並べたものとは、（x1 y1）（x2 y2）となって上の行列と違います。それとも、列ベクトルとは、（x1）（y1）の事ですか？（x1）（y1）ってどんなベクトルなんでしょうか？与えられた（仮定した）ベクトルは、 X=（x1,x2） Y=（y1,y2）ですよね・・・良くわかりません・・・列ベクトルを横に並べたものと言う説明がおかしいのでしょうか？列ベクトルとはどのようなものか教えて頂けないでしょうか？行列の積を考える場合、それぞれの型を考えて行列を作ります。（X Y）（x1 x2）（y1 y2）や（x1 y1）(X) （x2 y2）(Y) 今回は、行列だけなので、（x1 x2）（y1 y2）と（x1 y1）（x2 y2）は、行列式も同じになるので特に困った事には成らないのでしょうか？上の行列2つは転置行列になります。 X=（x1,x2） Y=（y1,y2）のベクトルを行列として表す場合、（x1 x2）（y1 y2）と表しても、（x1 y1）（x2 y2）と表してもどちらも間違いではないのでしょうか？以上、ご回答よろしくお願い致します。
Fortranでの記号「./」について

Fortran 90で書かれた数値計算プログラムを、より専門的な言語に書き換える作業を行っています。 Fortranを学んだことがないのでインターネット等で関数の意味や書式を調べながら作業しているのですが、「X./Y」という式の意味がわからずに困っています。単純に「X/Y」とはどう違うのでしょうか。初歩的な質問で申し訳ありませんが、よろしくお願いします。
fortranで

FORTRANを使っているのですが、よくわからないので質問です。以下のようなデータがあります。 F000 1.001 1.002 1.003 … F001 1.002 1.003 1.004 … F002 1.001 1.002 1.003 … F00xというタイトルが書いていて、その下に数字がいくつも書かれたものです。これが連続して何個も表示されています。このときに、F00xとその下に書いてある文字郡を一つずつのファイルに書き直したい(例えばF000、F001というように分ける)のですが、どのようにしたら良いかわかるでしょうか？
文字列抜出しソフト

ファイルの中の"M01"の直前の文字を抜出すフリーソフトってありますか？ X1038981Y739120Z147697F6000 Y744120Z139037 Y769120Z95735F0250 X951000F0500 Y744120Z139037←抜出し M01
16進数の文字列を普通の文字列に直す方法

色々と探し尽くしたのですが、 安室奈美&#x6075 のような文字列を安室奈美恵という普通の文字列に直す方法が解りません。 chr pack とかが引っかかりましたが、どうやら設定が必要なようでお手上げです。どなたかご教授よろしくお願い致します
文字列に含まれている「,」をカウントする

PHP4.x.xです。初心者です。以下のような文字列の「,」も数を数えたいのですが、どうしたらいいいでしょうか？以下のような文字列です。田中,佐藤,鈴木,前田どうぞアドバイスよろしくお願いします！！

[Fortran]文字列の並べ替え方法

みんなの回答

関連するQ&A

2つの文字列を比較する方法

BLOCK構造体とFORTRAN

Ｃ＃で文字列の置換えをするには？

FORTRANのプログラミングについて

FORTRAN90

Fortran でのマイナス乗数の書き方

ゼロを含む文字列の連結方法

文字列の入れ替え

秀丸の置換で/コメント文字列/"を削除したい。

C言語　プログラミング　文字列

エクセルで特定文字列の抽出する方法を教えてください。

Fortranで文字の読み込み＆書き込み

文字列と整数型について

awkで最後の列だけ除外する方法

行列　行ベクトル　列ベクトル　について

Fortranでの記号「./」について

fortranで

文字列抜出しソフト

16進数の文字列を普通の文字列に直す方法

文字列に含まれている「,」をカウントする

注目のQ&A

カテゴリ
一覧

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

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

[Fortran]文字列の並べ替え方法

みんなの回答

関連するQ&A

2つの文字列を比較する方法

BLOCK構造体とFORTRAN

Ｃ＃で文字列の置換えをするには？

FORTRANのプログラミングについて

FORTRAN90

Fortran でのマイナス乗数の書き方

ゼロを含む文字列の連結方法

文字列の入れ替え

秀丸の置換で/*コメント文字列*/"を削除したい。

C言語 プログラミング 文字列

エクセルで特定文字列の抽出する方法を教えてください。

Fortranで文字の読み込み＆書き込み

文字列と整数型について

awkで最後の列だけ除外する方法

行列 行ベクトル 列ベクトル について

Fortranでの記号「./」について

fortranで

文字列抜出しソフト

16進数の文字列を普通の文字列に直す方法

文字列に含まれている「,」をカウントする

注目のQ&A

カテゴリ 一覧

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

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

秀丸の置換で/コメント文字列/"を削除したい。

C言語　プログラミング　文字列

行列　行ベクトル　列ベクトル　について

カテゴリ
一覧

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