[#9811] Ruby book — WATANABE Tetsuya <tetsu@...>

今日のひとこと(10/05)

22 messages 1998/10/05
[#9812] Re: Ruby book — matz@... (Yukihiro Matsumoto) 1998/10/05

まつもと ゆきひろです

[#9813] Re: Ruby book — "D.Kanda" <MAP2303@...> 1998/10/05

[#9815] Re: Ruby book — matz@... (Yukihiro Matsumoto) 1998/10/05

まつもと ゆきひろです

[#9827] Are there any NNTP Client Class? — Takeshi UME Imai <takeshi@...>

はじめまして。今井といいます。

17 messages 1998/10/05
[#9828] Re: Are there any NNTP Client Class? — aamine@... 1998/10/05

はじめまして、あおきともうします。

[#9869] man-1.1/Marshal.html — ttate@...

立石です。

47 messages 1998/10/07
[#9872] Re: man-1.1/Marshal.html — matz@... (Yukihiro Matsumoto) 1998/10/08

まつもと ゆきひろです

[#9880] comments on manual (Re: man-1.1/Marshal.html) — Motoyuki Kasahara <m-kasahr@...> 1998/10/08

SRA の笠原です。

[#9881] Re: comments on manual (Re: man-1.1/Marshal.html) — matz@... (Yukihiro Matsumoto) 1998/10/08

まつもと ゆきひろです

[#9909] Re: comments on manual (Re: man-1.1/Marshal.html) — Motoyuki Kasahara <m-kasahr@...> 1998/10/09

SRA の笠原です。

[#9936] Re: comments on manual (Re: man-1.1/Marshal.html) — matz@... (Yukihiro Matsumoto) 1998/10/09

まつもと ゆきひろです

[#9939] Re: comments on manual (Re: man-1.1/Marshal.html) — Shin-ichro Hara <sinara@...> 1998/10/09

原です。

[#9940] Re: comments on manual (Re: man-1.1/Marshal.html) — matz@... (Yukihiro Matsumoto) 1998/10/09

まつもと ゆきひろです

[#9941] Re: comments on manual (Re: man-1.1/Marshal.html) — Shin-ichro Hara <sinara@...> 1998/10/09

原です。

[#9942] Re: comments on manual (Re: man-1.1/Marshal.html) — matz@... (Yukihiro Matsumoto) 1998/10/09

まつもと ゆきひろです

[#9944] read(nil) (Re: comments on manual) — Shin-ichro Hara <sinara@...> 1998/10/09

原です。

[#9884] List of UserInterface Kits for Ruby ? — a.furudo@...

20 messages 1998/10/08
[#9906] Re: List of UserInterface Kits for Ruby ? — matz@... (Yukihiro Matsumoto) 1998/10/09

まつもと ゆきひろです

[#9885] 文字化け失礼、再送 — Akihiro Furudo <a.furudo@...>

26 messages 1998/10/08
[#9888] Re: 文字化け失礼、再送 — ttate@... 1998/10/08

立石です。

[#9897] お礼と、 Ruby/Gtk(i18n) について質問 — Akihiro Furudo <A.Furudo@...> 1998/10/08

[#9982] Re: お礼と、 Ruby/Gtk(i18n) について質問 — Daisuke Kanda <MAP2303@...> 1998/10/11

[#10320] Ruby/Gtk を FreeBSD にインストール (re:9982) — Akihiro Furudo <a.furudo@...> 1998/10/24

[#10328] Re: Ruby/Gtk を FreeBSD にインストール (re:9982) — Daisuke Kanda <MAP2303@...> 1998/10/25

[#9976] ruby:struct -> ext module -> ruby — Kikutani Makoto <kikutani@...>

きくたにです。

17 messages 1998/10/11

[#9999] ruby on HP-UX — AU6M-IWM@... (Iwama Misao)

20 messages 1998/10/12
[#10001] Re: ruby on HP-UX — matz@... (Yukihiro Matsumoto) 1998/10/12

まつもと ゆきひろです

[#10030] Ruby/Gtk text widget — TAKAHASHI Masayoshi <maki@...>

高橋です。

29 messages 1998/10/12
[#10035] Re: Ruby/Gtk text widget — Daisuke Kanda <MAP2303@...> 1998/10/12

[#10038] ruby/gtk method naming (Re: Re: Ruby/Gtk text widget) — "D.Kanda" <MAP2303@...> 1998/10/13

[#10067] Re: ruby/gtk method naming (Re: Re: Ruby/Gtk text widget) — Kazumi Okamoto <kazusan@...> 1998/10/13

岡本です。

[#10092] for が修飾子だったら — ARIMA Yasuhiro <fit0298@...>

有馬@FITECです。

46 messages 1998/10/14
[#10093] Re: for が修飾子だったら — matz@... (Yukihiro Matsumoto) 1998/10/14

まつもと ゆきひろです

[#10236] Array.html again — Motoyuki Kasahara <m-kasahr@...>

笠原です。こんにちは。

18 messages 1998/10/22
[#10237] Re: Array.html again — Kanda <MAP2303@...> 1998/10/22

[#10239] Re: Array.html again — matz@... (Yukihiro Matsumoto) 1998/10/22

まつもと ゆきひろです

[#10311] Re: 大規模プログラムの友 — m_seki@... (SEKI)

At 11:23 PM 98.10.23 +0900, Takashi Nakai wrote:

24 messages 1998/10/23
[#10312] Re: 大規模プログラムの友 — Takashi Nakai <nakai@...1.sys.to.casio.co.jp> 1998/10/23

ど〜も、(またしても)中井です。

[#10369] Re: 大規模プログラムの友 — matz@... (Yukihiro Matsumoto) 1998/10/27

まつもと ゆきひろです

[#10415] split — flare@... (Takashi Ikeda)

ふれあです。

20 messages 1998/10/28

[#10473] case with Class — MineroAoki <aamine@...>

あおきです。

46 messages 1998/10/29
[#10483] Re: case with Class — matz@... (Yukihiro Matsumoto) 1998/10/30

まつもと ゆきひろです

[#10521] Re: case with Class — aamine@... 1998/10/30

こんにちは。あおきです。

[#10523] Re: case with Class — gotoken@... (GOTO Kentaro) 1998/10/30

ごとけんです

[#10530] Re: case with Class — aamine@... 1998/10/31

あおきです。

[#10544] Re: case with Class — shugo@... (MAEDA Shugo) 1998/10/31

前田です。

[#10548] Re: case with Class — Wakou Aoyama <wakou@...> 1998/10/31

青山です。

[#10555] Re: case with Class — shugo@... (MAEDA Shugo) 1998/11/01

前田です。

[#10566] Re: case with Class — Wakou Aoyama <wakou@...> 1998/11/01

青山です。

[ruby-list:10161] Re: Speed!

From: Kikutani Makoto <kikutani@...>
Date: 1998-10-17 15:27:47 UTC
List: ruby-list #10161
Sat, Oct 17, 1998 at 09:16:13PM +0900 において
EGUCHI Osamu さん曰く:

> gprof をとりました。

ありがとうございます。

>  43.6      15.04    15.04                             mcount (305)
>   9.3      18.24     3.20   110021     0.03     0.05  _rb_eval <cycle 1> [13]
>   5.3      20.08     1.84   472203     0.00     0.00  _gc_mark <cycle 2> [18]
>   3.9      21.43     1.35   890199     0.00     0.01  _rb_call0 <cycle 1> [11]
>   3.5      22.63     1.20   310011     0.00     0.01  _rb_scan_args [25]
>   3.0      23.68     1.04   100003     0.01     0.01  _strtod [36]
>   2.4      24.52     0.84      241     3.51     5.66  _gc_sweep [30]
>   2.4      25.36     0.84   110020     0.01     0.02  _rb_yield_0 <cycle 1> [19]
>   2.1      26.09     0.73   890199     0.00     0.00  _rb_call <cycle 1> [42]
>   1.6      26.65     0.55  3982128     0.00     0.00  _rb_special_const_p [49]
>   1.4      27.12     0.47   890209     0.00     0.00  _rb_class_of [53]
> 
> これを見る限り、、、
> GC止めるってありですか?

す、すみません、GC止めるってどうやるんですか?

あと、perl版も書きました。簡単に変換できたところを見ると
rubyらしい書き方をしてなかったのね...

% time perl floatBasic_perl
Elements = 100000, average = 14.499995
perl floatBasic_perl  6.67s user 0.06s system 49% cpu 13.651 total

# Pythonは途中まで書いてめげた。

-- 
人生を背負い投げ

菊谷 誠(Kikutani Makoto)  kikutani@sprintmail.com
                          kikutani@debian.or.jp (Linux関係のみ) 

Attachments (1)

floatBasic_perl (623 Bytes, text/plain)
$col_num = 0;
$row_num = 0;
open(IN, "floatData");
while (<IN>) {
  chop;
  @row = split(/\t/);
  if ($col_num == 0) {
    $col_num = $#row + 1;
    for ($i = 0; $i < $col_num; $i++) {
      $col_sum[$i] = 0.0;
    }
  }
  $rsum = 0.0;
  for ($i = 0; $i < $col_num; $i++) {
    $r = $row[$i];
    $rsum += $r;
    $col_sum[$i] += $r; 
  }
  $row_ave[$row_num] = $rsum / $col_num;
  $row_num++;
}
$total = 0.0;
for ($i = 0; $i < $col_num; $i++) {
  $c = $col_sum[$i];
  $col_ave[$i] = $c / $row_num;
  $total += $c;
}
$data_num = $row_num * $col_num;
printf("Elements = %d, average = %f\n", $data_num, $total / $data_num);

In This Thread