• ベストアンサー

文字列の中の統計について。

お世話になっております。 文字列の中で、一番多く使われている文字を算出したいのですが、 何か良い方法はありますでしょうか。 例えば、"あいうえおあいうえあいうあいあ" であれば、"あ" が 出てくるようにしたいのですが、VBScriptで可能でしょうか？ よろしくお願いいたします。

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

  • ベストアンサー
回答No.1

どのようなコードに対して「良い方法」かはわかりません。 私の思いついた範囲でお答えします。 1. 文字列をSplitで配列にする 2. 配列を文字コードでソートする 3. 配列をなぞって「最も長く連続した文字」が一番多い これでできます。 書いてて思いついたのでもうひとつ。 1. 先頭の１文字をReplaceして消して何文字減ったか記憶 2. 再び先頭の１文字をReplaceして1.より多く消えた場合はそれを記憶 以降、２を繰り返して、文字列がなくなったときに記録されている文字が最も多い。 出現数が同じだった場合の処理は考慮に入れていません。

crossone
質問者

お礼

Wizard_Zero様 お礼が遅くなりまして申し訳ございません。 ご回答ありがとうございました。 二通りのやり方とも大変勉強になりました。 今回、後者のやり方で対応したところ、無事解決いたしました。 本当にありがとうございました。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Microsoft ASP

関連するQ&A

  • 文字列・文字列表示を含む数式の合計

    　　　　A列　　　　B　　　　　C 　 1　　　3*2　　　　15　　　　文字列 2　　　20　　　　文字列　　　5*5 3　　　4*3　　　　3*3　　　　18 上記の場合 A1:C3の合計値105を簡単に算出する方法を 宜しくお願い致します。

  • 文字列内で括弧を使うには

    VBScript を使っています。 文字列内で括弧："(" や ")" を使いたいのですが、エラーになってしまいます。エラーを出さないためには、どのような書き方をすればよいのでしょうか。 よろしくお願いします。

  • 文字列の中からある文字の個数を調べるには？

    お世話になります。 abcdefga という文字列の中からaが何個あるのか調べる関数はありますでしょうか？ http://www.yahoo.co.jp URLからスラッシュの個数を調べたいのですが。

  • エクセルで文字列の中の特定の文字の抽出

    お世話になります。 エクセルで、B列のセルの文字列の中に特定の文字 (例えば文字列abcdefの特定の文字cd)があったら A列のセルにOKという文字を出すということはできますか？

  • 文字列からの関数を呼び出す。

    題名のとおり、文字列から関数を簡単に呼び出せる方法を考えています。 　現在、考えている方法は、ファイルへ、その文字列を書き込み、書き込み終了後、そのファイルを呼び出す方法しか考えつきません。この方法では、複数ユーザーからアクセスがあった場合に、ファイルのユニーク等の問題で、複雑になることが考えられます。 　他に、文字列から関数を簡単に呼び出す方法をご存知でしたら、教えてください。お願いいたします。 　ちなみに、VBScriptで試して、OKだったら、他の言語にも適用しようと考えています。 　質問がわかりづらいかもしれませんが、ご回答お願い致します。

  • VBScriptの文字列の最大文字数は？

    初心者です、ASPのVBScriptの文字列の最大文字数は何文字でしょうか？ また、ウェブ上で見ることのできるVBScriptのリファレンスマニュアルなどでよいものは無いでしょうか？ オンラインヘルプも在るようですが使用し方が分かりませんのでその当りのアドバイスお願いできればと思います・

  • 文字列の中に半角文字があるか調べる

    文字列の中に半角文字があるかを調べる簡単な方法を 教えて下さい。 例　　テレコムサービス　　　半角文字あり（テレコ） 　　　テレコムサービス　 半角文字なし

  • VBScriptで文字列置換

    VBScriptで文字列置換をさせたいので コーディングをご教授ください。 ----------------------------------------------- 置換前 あいうえお@,@aaaaaaaa@,@5648941248@ かきくけこさし@,@bbb@,@15249511456664654654@ 置換後 あいうえお@,@aaaaaaaa@,@111@ かきくけこさし@,@bbb@,@111@ ----------------------------------------------- 最後の@で囲まれた部分の数字を全て111にしたいのです。

  • 文字列の中をチェックしたいのですが・・・

    文字列の入った配列の中をチェックし重複する文字列がある場合 その文字列を消去し文字列に対応した個数をカウントしていくものを VB6.0で作っているのですがどうしても上手くいきません。 どうか教えてくださいおねがいします。

  • TXTの中にある特定の記号や文字列内の置き換え。

    いつもお世話になっております。 テキストの中の決まった記号に挟まれた(例えば < > など)の中の文字列を消去あるいは置き換える方法、またはそういうことのできる機能を持ったソフトウェアをご存じありませんか。どうぞよろしくお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する