WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

DigitCount[n,b,d]

基底 b での n の表現における d の数を与える．

DigitCount[n,b,d,len]

n の最後の len 桁の，基底 b での表現における d 桁の数を与える．

DigitCount[n,b]

基底 b での n の表現における, , …, , の数のリストを与える．

DigitCount[n]

基底10での n の表現における, , …, , の数のリストを与える．

詳細
Details and Options Details and Options
例題  
例  
スコープ  
アプリケーション  
特性と関係  
考えられる問題  
関連項目
テクニカルノート
関連するガイド
関連リンク
履歴
引用書式

DigitCount

DigitCount[n,b,d]

基底 b での n の表現における d の数を与える．

DigitCount[n,b,d,len]

n の最後の len 桁の，基底 b での表現における d 桁の数を与える．

DigitCount[n,b]

基底 b での n の表現における, , …, , の数のリストを与える．

DigitCount[n]

基底10での n の表現における, , …, , の数のリストを与える．

詳細

  • 記号操作・数値操作の両方に適した数学的整数関数である．
  • DigitCount[n,b,dlist,…]は，リスト dlist の桁に縫い込まれる． »
  • DigitCount[nlist,…]は，リスト nlist の桁に縫い込まれる． »
  • DigitCount[n]は，DigitCount[n,10,Mod[Range[10],10]]と等価である． »
  • DigitCount[0,b,0]は1を与える． »

例題

すべて開く すべて閉じる

例  (3)

バイナリ表現における1の数：

Wolfram Language code: DigitCount[2147, 2, 1]

1と0の数：

Wolfram Language code: DigitCount[2147, 2]

2進表現で数を拡張することによって確認する：

Wolfram Language code: IntegerDigits[2147, 2]

100!の中の1, 2, 3, ..., 0の数：

Wolfram Language code: DigitCount[100!]

2を底とした表記における1の数をプロットする：

Wolfram Language code: DiscretePlot[DigitCount[n, 2, 1], {n, 2 ^ 7 - 1}]

スコープ  (2)

数の十進法による各桁の数を数える：

Wolfram Language code: DigitCount[122000]

明示的に基底を指定して同じことを行う：

Wolfram Language code: DigitCount[122000, 10]

0の数だけを数える：

Wolfram Language code: DigitCount[122000, 10, 0]

9桁の数であると仮定して，0の数を数える：

Wolfram Language code: DigitCount[122000, 10, 0, 9]

三進法表現での1と2の桁の数を数える：

Wolfram Language code: DigitCount[242442422, 3, {1, 2}]

逆の順序で取得する：

Wolfram Language code: DigitCount[242442422, 3, {2, 1}]

三進数表記の最後12桁における1と2の桁の数を数える：

Wolfram Language code: DigitCount[242442422, 3, {1, 2}, 12]

アプリケーション  (2)

トゥエ・モース(Thue–Morse)数列の0番目から24番目までの要素：

Wolfram Language code: Table[Mod[DigitCount[n - 1, 2, 1], 2], {n, 25}]

ThueMorseが与える答と比較する：

Wolfram Language code: % == Table[ThueMorse[n], {n, 0, 24}]

セルオートマトンのルール90でステップ t での黒いセルの数（2を法とした二項係数）：

Wolfram Language code: Table[2 ^ DigitCount[t, 2, 1], {t, 0, 10}]
Wolfram Language code: Total /@ CellularAutomaton[90, {{1}, 0}, 10]

特性と関係  (8)

DigitCount[n]はDigitCount[n,10,Mod[Range[10],10]]に等しい：

Wolfram Language code: With[{n = RandomInteger[10^6]}, DigitCount[n] === DigitCount[n, 10, Mod[Range[10], 10]]]

DigitCount[n,b,dlist]は，リスト dlist の桁に縫い込まれる：

Wolfram Language code: DigitCount[111122555363, 10, {3, 1, 6, 1, 3}]

DigitCount[nlist,…]は，リスト dlist の桁に縫い込まれる：

Wolfram Language code: DigitCount[{123, 456, 789}]

数のリストと基数を指定する：

Wolfram Language code: DigitCount[{123, 456, 789}, 5]

DigitCount[nlist,b,dlist,…]については，結果はLength[nlist]のリストが示すものであり，各リストの長さはLength[dlist]である：

Wolfram Language code: DigitCount[{123, 456, 789}, 5, {1, 3}]

DigitCount[n,b,d,len]は，事実上，Count[IntegerDigits[n,b],d]である：

Wolfram Language code: DigitCount[242442422, 3, 0] == Count[IntegerDigits[242442422, 3], 0]

DigitCount[n,b,d,len]は，事実上，Count[PadLeft[IntegerDigits[n,b],len],d]である：

Wolfram Language code: DigitCount[242442422, 3, 0, 20] == Count[PadLeft[IntegerDigits[242442422, 3], 20], 0]

DigitCount[n,b]はValues[Counts[IntegerDigits[n,b],Mod[Range[b],b]]と等価である：

Wolfram Language code: DigitCount[12345, 6] == Values[Counts[IntegerDigits[12345, 6], Mod[Range[6], 6]]]

拡張すると，これは右辺に b==10を持つDigitCount[n]にも適用される：

Wolfram Language code: DigitCount[12345] == Values[Counts[IntegerDigits[12345, 10], Mod[Range[10], 10]]]

DigitCount[0,b,0]は1を与える：

Wolfram Language code: Table[DigitCount[0, b, 0], {b, {2, 8, 10, 16}}]

これは，IntegerDigits[0,b]の挙動と一致している：

Wolfram Language code: Table[IntegerDigits[0, b], {b, {2, 8, 10, 16}}]

DigitCount[n,b,{}]は{}を与える：

Wolfram Language code: DigitCount[RandomInteger[10 ^ 6], RandomInteger[{2, 16}], {}]

考えられる問題  (2)

DigitCountとIntegerDigitsは0が単一の桁からなるとみなす：

Wolfram Language code: {DigitCount[0, 10, 0], IntegerDigits[0]}

これとは異なり，IntegerLengthは0には桁がないとみなす：

Wolfram Language code: IntegerLength[0, 2]

基底引数をリストにすることはできない：

Wolfram Language code: DigitCount[100, {3, 5, 7}]

末尾桁数引数指定もできない：

Wolfram Language code: DigitCount[100, 3, {0, 1, 2}, {3, 4}]

必要に応じて，Mapを使用してこれらの引数に対して手動で縫い込む．

Wolfram Language code: DigitCount[100, #]& /@ {3, 5, 7}
Wolfram Research (1999), DigitCount, Wolfram言語関数， https://reference.wolfram.com/language/ref/DigitCount.html （2025年に更新）.

テキスト

Wolfram Research (1999), DigitCount, Wolfram言語関数， https://reference.wolfram.com/language/ref/DigitCount.html （2025年に更新）.

CMS

Wolfram Language. 1999. "DigitCount." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2025. https://reference.wolfram.com/language/ref/DigitCount.html.

APA

Wolfram Language. (1999). DigitCount. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/DigitCount.html

BibTeX

@misc{reference.wolfram_2026_digitcount, author="Wolfram Research", title="{DigitCount}", year="2025", howpublished="\url{https://reference.wolfram.com/language/ref/DigitCount.html}", note=[Accessed: 13-September-2026]}

BibLaTeX

@online{reference.wolfram_2026_digitcount, organization={Wolfram Research}, title={DigitCount}, year={2025}, url={https://reference.wolfram.com/language/ref/DigitCount.html}, note=[Accessed: 13-September-2026]}