도전

입력으로 세 개의 정수가 주어지며 min_value, max_value, sample_size, 배열 또는 여러 매개 변수로 답변에 전달할 수 있습니다.

당신의 작업은 임의의 편리한 형식으로 다이어그램 을 출력하는 것인데 , (min_value, max_value)범위 내의 임의의 숫자 (min_value, max_value)가 선택 될 때 나타나는 범위 내의 숫자의 빈도를 보여줍니다 sample_size. 난수 시퀀스는 답변 내에 생성되어야합니다.

넓은 범위와 표본 크기를 사용하면 표현이 정확한 한 다이어그램이 사용하는 단계를 자유롭게 변경할 수 있습니다.

예

함께 [1, 5, 10]입력으로서 :

o o o x o
x o x x x
x x x x x
1 2 3 4 5

로 [1, 100, 15](00 도시 1-9,도 10 10-19 등 때문에 10 단계)로서 입력 :

xx oo oo xx oo xx oo oo oo oo
xx oo oo xx oo xx xx oo oo oo
xx xx oo xx xx xx xx xx xx oo
00 10 20 30 40 50 60 70 80 90

채점

이것은 code-golf 이므로 바이트 단위의 가장 짧은 코드가 이깁니다.

젤리 , 13 바이트

Ṫɓr/;"xẊĠ>ʋ¥G

매우 편리한 형식을 사용 합니다.

• 왼쪽 축에 값을 인쇄합니다
• 용도 0(등에 배신 화소로서 xS)과 1백그라운드 화소 등 (등 o의)
• 범위 내 최대 길이 숫자의 문자가 있으므로 "픽셀"사이의 가로 간격을 많이 사용합니다 (예 : -23은 길이 3, 23은 길이 2).

온라인으로 사용해보십시오!

참고 : 입력 배열이 필요하지 않은 경우가 될 것이다 11 바이트 , 두 개의 인수를 복용 [from, to]하고 sampleSize단지와 함께 r/;"xẊĠ>ʋ¥G.

나는 이것이 4 바이트에 대해 편리한 포맷 허용량을 조금 너무 많이 가지고 있다고 생각합니다.

Ṗ;1K

이것은 공백으로 식별 되고 분리 된 단일 빈 , 축을 나타내는 다른 공간 및 높이 100 %를 나타내는 단일 빈으로 주석 에 Giuseppe 가 제시 한 아이디어 (해결해야 함)를 사용 from하고 있습니다.to1

... 또는 심지어 Ṗ12 바이트 만!

옥타브 , 34 32 바이트

@(a,b,n)hist(--a+randi(b-a,n,1))

TIO에서는 작동하지 않지만 Octave-online.net에서 작동합니다 .

다음과 같은 히스토그램 (막 대형 차트)을 만듭니다.

"모든 편리한 형식"으로 계산됩니다.

0이 아닌 구간을 표시 해야하는 경우 38 바이트로 해결할 수 있습니다.

@(a,b,n)hist(--a+randi(b-a,n,1),a+1:b)

R , 36 바이트

function(a,b,n)stem(sample(a:b,n,T))

온라인으로 사용해보십시오!

한숨. 줄기 도표.

무슨 말을하는지 모르지만 여전히 줄기 판이 14 판에 있기 때문에 줄기 세포가 좋은 생각이라고 생각하는 일부 교수로부터 [이 특정 연구 분야]에 대한 통계 소개를 받는 2 학년 대학생들의 존재 1983 년 4 판 이후 출판 된 교과서 중

숯 , 25 바이트

≔…·θηθ≔Ｅζ‽θηＥθ№ηι↖←Ｅ⮌θ⮌Ｉι

온라인으로 사용해보십시오! 설명:

≔…·θηθ

분포의 포괄적 인 범위를 만듭니다.

≔Ｅζ‽θη

원하는 횟수의 범위를 샘플링하십시오.

Ｅθ№ηι

샘플에서 각 범위의 수를 세고 인쇄하십시오.

↖←Ｅ⮌θ⮌Ｉι

라벨을 인쇄하십시오.

파이썬 2 , 115 바이트

from random import*
a,b,n=input()
r=range(a,b+1)
s=sample(r*n,n)
for v in r:print'%%0%dd'%len(`b`)%v,s.count(v)*'x'

온라인으로 사용해보십시오!

파이썬 2 , 164 바이트

열 기반 출력.

from random import*
a,b,n=input()
r=range(a,b+1)
s=sample(r*n,n)
d=len(`b`)
while n:n-=1;print' '.join(d*'ox'[s.count(v)>n]for v in r)
for v in r:print'%%0%dd'%d%v,

온라인으로 사용해보십시오!

Java 11, 184168 바이트

(m,M,s)->{int a[]=new int[M],q=M;for(;s>0;q=M)if((q*=Math.random())>m-2){a[q]++;s--;}for(;m<=M;)System.out.printf("%0"+(M+"").length()+"d%s%n",m,"*".repeat(a[m++-1]));}

온라인으로 사용해보십시오. (참고 : Java 11은 아직 TIO가 아니기 때문에 동일한 바이트 수에 대해 String.repeat(int)에뮬레이트됩니다 repeat(String,int).)

설명:

(m,M,s)->{                         // Method with three integer parameters & no return-type
                                   // (`m` = min_value; `M` = max_value; `s` = sample_size)
  int a[]=new int[M],              //  Integer-array, filled with `M` amount of 0s
      q=M;                         //  Temp integer for the random value, set to `M`
  for(;s>0;                        //  Loop as long as `s` isn't 0 yet:
      q=M)                         //    Reset `q` back to `M` after every iteration
    if((q*=Math.random())          //   Pick a random integer in the range [0, `M`)
       >m-2){                      //   If this random integer is larger than `m-2`:
      a[q]++;                      //    Increase the value at that this random index by 1
      s--;}                        //    And decrease `s` by 1
  for(;m<=M;)                      //  Loop in the range [`m`, `M`]
    System.out.printf(             //   Print with trailing new-line
      "%0"+(M+"").length()+"d%s%n",//   and leading zeros if necessary:
      m,                           //    The number
      "*".repeat(a[m++-1]));}      //    appended with "*" repeated the amount of times
                                   //    specified in the random array at index `m-1`

R , 52 바이트

function(a,b,n)table(cut(sample(a:b,n,T),a:(b+1)-1))

온라인으로 사용해보십시오!

반환 table과 주파수를 names선택한 반개 구간과 동일 cut하므로, (0,1], (1,2], (2,3], 등. 보다 합리적인 비닝을 선택하려고하지 않습니다.

루비, 135 바이트 , 117 바이트

d=->(m,n,s){p=(m..n);t=(1..s).map{rand(p)};p.map{|h|g=t.count(h);"#{h}-#{'x'*g}#{'o'*(t.map{|e|t.count(e)}.max-g)}"}}

언 골프 드 :

d =-> (m,n,s) {
  p = (m..n)
  t = (1..s).map{rand(p)}
  p.map{ |h|
    g = t.count(h)
    "#{ h }-#{ 'x' * g }#{ 'o' * (t.map{|e| t.count(e) }.max - g) }"
  }
}

puts d.call(1,5,10)

펄 5 , 85 바이트

/ \d+/;$d[$`+rand$&-$`+1]++for 1..$';say$"x(length($&)-length),$_,"-"x$d[$_]for$`..$&

온라인으로 사용해보십시오!

@Neil 의 Charcoal 답변 과 유사한 출력을 생성합니다 .

자바 스크립트, 239

죄송하지만 변수 이름은 willy-nilly입니다. 어쨌든, 질문은 편리한 형식 이라고 말했기 때문에이 함수는 옆으로 그래프를 반환합니다.

f=>{x=Math;z=Array;q=_=>x.floor(x.random()*(f[1]-f[0]))+f[0];r=z(f[1]-f[0]).fill(0);z(f[2]).fill``.forEach(_=>r[q()-1]++);u=`${f[1]}`.length;return r.map((e,i)=>`${`${i}`.padEnd(u)}${" x".repeat(e)}`.padEnd(x.max(...r)*2+u," o")).join`\n`}

apt -R, 14 바이트

최대, 최소, 크기 순서로 입력을받습니다. 차트를 가로로 출력합니다.

õV
öW
Ë+QpVè¥D

시도 해봐

설명

             :Implicit input of integers U=max_value, V=min_value & W=sample_size
õV           :Range [U,V]
\n           :Reassign to U
öW           :Get an array of W random elements from U
\n           :Reassign to V
Ë            :Map each integer D in U
 +           :  Append
  Q          :  Quotation mark
   p         :  Repeat
    Vè       :   Count the elements in V
      ¥D     :    That equal D
             :Implicitly join with newlines and output.

Pyth, 19 바이트

JmOK}FPQeQVK,N*/JNd

여기 사용해보십시오

설명

JmOK}FPQeQVK,N*/JNd
   K}FPQ             Get the inclusive range between the first two inputs as K.
JmO     eQ           Get <last input> random elements as J.
          VK         For each value in the range...
            ,N       ... output a list of the value...
              */JNd  ... and spaces equal to the count in J.