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

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

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

CSV(Comma-Separated Values)はコンマで区切られた明白なテキスト値のリストです。もしくは、そのフォーマットでひとつ以上のリストを含むファイルを指します。

FORTRAN

FORTRAN(フォートラン)は科学時術計算に向いた手続き型プログラミング言語です。 並列計算の最適化が行いやすい特性上、数値予報および気候モデルなどの大規模な計算を行う分野のスーパーコンピュータで使われています。

Q&A

解決済

fortranで文字列と数値の混在したcsvファイルの読み込み

yuyakawano
yuyakawano

総合スコア7

CSV

CSV(Comma-Separated Values)はコンマで区切られた明白なテキスト値のリストです。もしくは、そのフォーマットでひとつ以上のリストを含むファイルを指します。

FORTRAN

FORTRAN(フォートラン)は科学時術計算に向いた手続き型プログラミング言語です。 並列計算の最適化が行いやすい特性上、数値予報および気候モデルなどの大規模な計算を行う分野のスーパーコンピュータで使われています。

2回答

0グッド

0クリップ

11953閲覧

投稿2018/08/07 14:18

前提・実現したいこと

fortranで以下のような文字列と数値の混在したcsvファイルを読み込みたいです。

'18-08-05 12:00:00.00s,1.00,2.00
...

発生している問題・エラーメッセージ

 1行目の日付と時刻の部分は必要ないのでダミーの文字型変数を宣言して読み飛ばしていたんですが、どうも先頭の'(アポストロフィー? シングルクオート?)のせいなのかうまくいきません。
また、日付と時刻の間は半角スペース1つが1つあります。ここはまとめて文字に格納してもいいし、別々で文字に格納してもいいし、丸々読み飛ばしてもいいです。

何か上手い方法をご存知の方がいましたらよろしくお願いします。

該当のソースコード

fortran

プログラム:test.f90
program test
implicit none
real,dimension(2)::x
character(len=30) :: dummy
open(10,file='test.csv')
read(10,)dummy,x(1:2)
close(10)
write(
,*)dummy,x(1:2)
end program test

入力ファイル:test.csv
'18-08-05 12:00:00.00s,1.00,2.00

エラーメッセージ:
At line 6 of file test.f90 (unit = 10, file = 'test.csv')
Fortran runtime error: End of file
Error termination. Backtrace:
Program received signal SIGSEGV: Segmentation fault - invalid memory reference.
Backtrace for this error:

試したこと

ここに問題に対して試したことを記載してください。

補足情報(FW/ツールのバージョンなど)

ここにより詳細な情報を記載してください。

以下のような質問にはグッドを送りましょう

  • 質問内容が明確
  • 自分も答えを知りたい
  • 質問者以外のユーザにも役立つ

グッドが多くついた質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

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

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

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

下記のような質問は推奨されていません。

  • 間違っている
  • 質問になっていない投稿
  • スパムや攻撃的な表現を用いた投稿

適切な質問に修正を依頼しましょう。

回答2

1

ベストアンサー

list-directed な format * は、スペースやコンマを区切り文字として CSV 形式をパースしてくれるので、CSV データを読む時の選択としては悪くない。文字列長や数値桁が可変だと * を使わないと自分でパースする羽目になる。

ただ、list-directed だと、文字列引用符は文字列と、数字 * は反復、/ はデータ終わりを意味するなど、普通の文字が役付き文字になっているのでその辺に注意が必要になる。

今の場合、文字列が始まったが、閉じ引用符がないので叱られている。一度バッファ文字列に入れて、1文字目のシングル・クォートを外して、内部ファイルとしてあらためて list-directed で読むこともできる。ただし、この場合日付と時間の間の空白が区切り文字となるので、2個ダミーの文字変数が必要となる。

読みたい数値が固定フォーマットなら、hope_mucci さんのようにフォーマットを指定してもいい。

program test implicit none real,dimension(2)::x character(80) :: buff character(len=30) :: dummy1, dummy2 !open(10,file='test.csv') read(10, '(a)') buff print *, buff(2:) read(buff(2:),*) dummy1, dummy2, x(1:2) close(10) write(*,*) dummy1,dummy2,x(1:2) end program test
18-08-05 12:00:00.00s,1.00,2.00 18-08-05 12:00:00.00s 1.000000 2.000000 続行するには何かキーを押してください . . .

投稿2018/08/08 02:30

curehoney

総合スコア249

MTanaka_👍を押しています

良いと思った回答にはグッドを送りましょう。
グッドが多くついた回答ほどページの上位に表示されるので、他の人が素晴らしい回答を見つけやすくなります。

下記のような回答は推奨されていません。

  • 間違っている回答
  • 質問の回答になっていない投稿
  • スパムや攻撃的な表現を用いた投稿

このような回答には修正を依頼しましょう。

回答へのコメント

yuyakawano

2018/08/08 05:31

分かりやすく説明していただきありがとうございました。完璧に解決しました。

0

書式*指定なんて横着せずに、きちんとaで指定してやれば読めます。
この機に入出力書式指定方法をしっかり覚えましょう。

あと、質問文にコードを載せる場合はこうやって```でくくること。
読みやすくなり、検証しやすくなります。

fortran

1program test 2 implicit none 3 real,dimension(2)::x 4 character(len=30) :: dummy 5 read(*,'(a22,f4.2,f4.2)')dummy,x(1:2) 6 write(*,*)dummy,x(1:2) 7end program test

テストのためstdinにしましたが、利用するならファイル入力に書き換えてね。

投稿2018/08/07 22:31

hope_mucci

総合スコア4403

良いと思った回答にはグッドを送りましょう。
グッドが多くついた回答ほどページの上位に表示されるので、他の人が素晴らしい回答を見つけやすくなります。

下記のような回答は推奨されていません。

  • 間違っている回答
  • 質問の回答になっていない投稿
  • スパムや攻撃的な表現を用いた投稿

このような回答には修正を依頼しましょう。

回答へのコメント

yuyakawano

2018/08/08 05:32

分かりやすい回答ありがとうございました。

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

ただいまの回答率
86.02%

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

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

質問する

関連した質問

同じタグがついた質問を見る

CSV

CSV(Comma-Separated Values)はコンマで区切られた明白なテキスト値のリストです。もしくは、そのフォーマットでひとつ以上のリストを含むファイルを指します。

FORTRAN

FORTRAN(フォートラン)は科学時術計算に向いた手続き型プログラミング言語です。 並列計算の最適化が行いやすい特性上、数値予報および気候モデルなどの大規模な計算を行う分野のスーパーコンピュータで使われています。