이 과제의 과제는 배열 요소를 타임 빈에 넣는 것입니다. 입력은 이벤트 시간을 나타내는 양의 정수로 구성된 비감 소형 배열이며 각 빈의 크기를 나타내는 정수입니다. 예를 들어 보자. 입력 배열 A과 출력 배열을 호출합니다 O.

`A = [1,1,1,2,7,10]` and `bin_size = 2`.

`O = [4,0,0,1,1]`.

왜 ? A를 bin_size = 2, 우리는 다음과 같은 간격으로해야합니다 : (0,2], (2,4], (4,6], (6,8], (8,10]네 항목은 (1,1,1,2)첫 구간 내에을 (0,2], 두 번째와 세 번째 간격 없음, 하나의 7간격에서 (6,8], 하나의 10간격에서 (8,10].

코드는 길이의 모든 간격 고려해야 bin_size에서 시작을 0하고 얼마나 많은 숫자를 계산 A각이있다. 구간의 오른쪽 끝을 항상 빈에 포함시켜야합니다. 위의 예 2에서는의 개수에 포함됩니다 4. 코드는 입력 및 출력 길이의 합으로 선형 시간으로 실행되어야합니다.

더 많은 예 :

`A = [1,2,7,12,15]`  and `bin_size = 5`.

`O = [2, 1, 2]`.

`A = [1,2,7,12,15]`  and `bin_size = 3`.

`O = [2,0,1,1,1]`.

입력 및 출력을 편리한 형식으로 제공 할 수 있다고 가정 할 수 있습니다. 원하는 언어와 라이브러리를 사용할 수 있습니다.

R , 48 바이트

function(n,s)table(cut(n,0:ceiling(max(n)/s)*s))

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

다시 한번, table그리고 cutA와 팅은 factor비닝에 대한 트릭을 할. 출력라는 vector(가) 여기서, names예를 들면 간격 표기법의 간격은이다 (0,5].

편집 : s나누지 않을 때 작동하는 이전 버전으로 되돌립니다 n.

옥타브 , 36 바이트

@(A,b)histc(A,1:b:A(end)+b)(1:end-1)

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

부활절 달걀 사냥과 모닥불 만들기. 시간이 있으면 설명을 추가하겠습니다.

펄 5 -a -i , 32 28 바이트

-i 옵션 다음에 개수를 지정하십시오. STDIN에서 각 입력 요소를 별도의 줄에 제공하십시오.

$G[~-$_/$^I]--}{say-$_ for@G

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

파이썬 2 , 62 바이트

I,s=input()
B=[0]*(~-I[-1]/s+1)
for i in I:B[~-i/s]+=1
print B

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

05AB1E , 18 바이트

θs/Å0¹vDyI/î<©è>®ǝ

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

APL + WIN, 23 바이트

bin의 화면 입력을 요청한 다음 정수 벡터를 프롬프트합니다.

+⌿<\v∘.≤b×⍳⌈⌈/(v←⎕)÷b←⎕    

설명:

⎕ Prompt for input

⌈⌈/(v←⎕)÷b←⎕ divide the integers by bin size, take maximum and round up for number of bins

b×⍳ take number of bins from previous step and create a vector of bin upper boundaries

v∘.≤ apply outer product to generate boolean matrix where elements of vector ≤ boundaries

<\ switch off all 1's after first 1 in each row to filter multiple bin allocations

+⌿ sum columns for the result

C ++ (gcc) , 90 83 바이트

auto f(auto i,int s){typeof i j;for(auto v:i)--v/=s,j.resize(v+1),j[v]++;return j;}

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

자바 8, 75 바이트

a->b->{var r=new int[~-a[a.length-1]/b+1];for(int i:a)r[~-i/b]++;return r;}

@DeadPossum의 Python 2 답변 포트 이므로 답변을 상향 조정 하십시오!

설명:

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

a->b->{          // Method with integer-array and integer parameters and no return-type
  var r=new int[~-a[a.length-1]/b+1];
                 //  Result integer-array of size `((last_item-1)/bin_length)+1`
  for(int i:a)   //  Loop over the input-array
    r[~-i/b]++;  //   Increase the value at index `(i+1)/bin_length` by 1
  return r;}     //  Return the result-array

루비 , 60 바이트

->a,b{(b...a[-1]+b).step(b).map{|i|a.count{|n|n<=i&&n>i-b}}}

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

자바 스크립트 (ES6), 60 바이트 / O (len (a) + max (a) / n)

@Neil 덕분에 5 바이트 절약

카레 구문으로 입력을 (a)(n)받습니다.

a=>n=>[...a.map(x=>o[x=~-x/n|0]=-~o[x],o=[])&&o].map(n=>~~n)

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

또는 빈 요소가 허용되면 43 바이트 / O (len (a)) 만 있습니다.

하스켈 , 63 75 70 바이트

l!n=l#[n,2*n..]
[]#_=[]
l#(b:i)|h<-length$takeWhile(<=b)l=h:drop h l#i

이 짧은 것은 선형이 아니라 2 차입니다.

l!n=l#[n,2*n..]
[]#_=[]
l#(b:i)=sum[1|a<-l,a<=b]:[a|a<-l,a>b]#i

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

Pyth, 23 22 바이트

Jm/tdeQhQK*]ZheJhXRK1J

여기 사용해보십시오

Jm/tdeQhQK*]ZheJhXRK1J
Jm/tdeQhQ                 Find the bin for each time and save them as J.
         K*]ZheJ          Create empty bins.
                 XRK1J    Increment the bins for each time within them.
                h         Take the first (because mapping returned copies).

루비 , 53 50 바이트

편집 : iamnotmaynard에 의해 -3 바이트.

->a,b{(0..~-a.max/b).map{|i|a.count{|x|~-x/b==i}}}

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

이 퍼즐은 본질적으로 카운트 정렬입니다. 우리는 입력을 먼저 거치지 않고 출력 길이를 모른다.

C (클랑) , 53 바이트

i,j;f(*A,l,b,*O){for(j=0;j<l;O[(A[j++]+b-1)/b-1]++);}

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

이 솔루션은 다음과 같은 매개 변수를 사용합니다.
A출력
l에 대한
bbin_size
O스토리지 의 입력 배열 길이 . 길이가 충분
하고 O로 출력을 리턴 해야합니다 .

이 솔루션에는 핸디캡이 있습니다. 출력 배열 O의 길이를 반환하지 않으므로 호출자는 인쇄 할 양을 모릅니다.

다음 버전은 그 장애를 극복합니다.

C (클랑) , 79 바이트

i,j,k;f(*A,l,b,*O,*m){for(k=j=0;j<l;O[i=(A[j++]+b-1)/b-1]++,k=k>i?k:i);*m=++k;}

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

추가 매개 변수를 사용 m하여 길이를 반환 O합니다. 26 바이트가 들었습니다.

C (gcc) , 102 90 89 86 바이트

#define P!printf("%d ",k)
i,j,k;f(s){for(i=s;~scanf("%d",&j);k++)for(;j>i;i+=s)k=P;P;}

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

12 바이트를 줄인 케빈 크루이 센 (Kevin Cruijssen)과 4 바이트를위한 실링 캣에 감사드립니다!