수학 :: 라운드 :: 공정

반올림 오류를 공정하게 배포합니다
지금 다운로드

수학 :: 라운드 :: 공정 순위 및 요약

광고

  • Rating:
  • 특허:
  • Perl Artistic License
  • 가격:
  • FREE
  • 게시자 이름:
  • Marc Mims
  • 게시자 웹사이트:
  • http://search.cpan.org/~mmims/

수학 :: 라운드 :: 공정 태그


수학 :: 라운드 :: 공정 설명

반올림 오류를 공정하게 배포하십시오 수학 :: Round :: Fair는 단일, 내보낼 수있는 기능, Round_fair를 제공하는 Perl 모듈로, 반올림 할 확률이있는 반올림 할 확률이있는 반올림 또는 아래로 둥글게 배포하는 둥근 값을 꽤 배포하는 ROUTH_FAIR을 제공하는 PERL 모듈입니다. 둥글게 분수. 예를 들어, round_fair는 0.5 ~ 1.0을 0.5로 반올림 할 것입니다. 그것은 0.3 ~ 1.03 ~ 10 배 중 3 점, 평균적으로 10 배로 10 번 둥글게 될 것입니다. 하나의 분할 할 수없는 품목, 예를 들어, 3 개의 균등하게 가중 된 계정, A, B 및 C를 통해 페니를 배포하는 문제. 순진한 접근 방식을 사용하면 할당 된 부분이 1/3이고 1/3 라운드가 0으로이기 때문에 계정 중 어느 것도 할당되지 않습니다. 우리는 1 개의 할당되지 않은 항목으로 남아 있습니다. 다른 접근 방식은 각 단계에서 기초를 조정하는 것입니다. 우리는 3 개의 계좌로 할당하기 위해 1 항목으로 시작합니다. 1/3 라운드가 0이므로 계정 A가 할당을받지 않으며 고려 사항을 고려해야합니다. 자, 우리는 2 개의 계정과 할당 할 항목이 하나 있습니다. 1/2 라운드를 1로, 우리는 1 개의 항목을 계정에 할당합니다. 계정 c는 할당을 할당되지 않기 때문에 할당을 얻지 못하면 1 개의 항목을 동일한 세 가지 계정으로 할당하는 경우 10,000 회. 이상적으로, 두 개의 계정은 3,333 개의 항목으로 끝나야하며, 3,334 개의 항목으로 끝나야합니다. 순수한 접근 방식을 사용하면 모든 세 가지 계정 모두 할당이므로 할당이 1/3이므로 배분이 0으로 반올림됩니다. 두 번째 방법을 사용하여 계정 A와 계정은 할당을받지 않으며 계정 B는 10,000 개 항목의 전체 할당을 받게됩니다. 계정은 항상 두 번째 방법을 사용하여 라운딩 오류의 이점을 항상받습니다 .Round_fair는 반올림 오류의 공정한 분포를 보장하기 위해 무작위로 알고리즘을 사용합니다. 예제 문제에서는 할당 할 항목 1 개부터 시작합니다. 우리는 계정 A의 SHARE, 1/3을 계산합니다. 그것이 하나보다 작으므로, 우리는 그것을 반올림 할 확률로 1/3의 기회를주었습니다 (따라서 2/3 반올림 기회). 그 시간의 할당 1/3을 이긴다. 우리가 계속해서 B의 할당을 2/3로 계산합니다. 우리는 1/2로 B의 할당을 계산합니다 (남은 계정이 있으며 할당 할 항목이 하나만 있기 때문에). B는 시간 중 2/3 (또는 1/3)의 시간과 낮은 시간의 2/3 (또는 1/3)의 1/2를 1/2로 돌립니다. NOR B 라운드 (2/3 * 1/2 또는 시간의 1/3) 라운드가 아닌 경우 C의 할당을 할당 할 항목이 하나 있고 하나의 계정 만 할당 할 항목이 있기 때문에 C의 할당은 1/1로 계산됩니다. ...에 따라서 시간의 1/3은 반올림 오류의 이점을받습니다. 할당되지 않은 항목을 끝내지 않습니다.이 알고리즘은 모든 수의 가중 할 Allocations.round_fair ($ value, @weights)에 대해 작동합니다. 각 반환 값은 $ 값의 일부인 값 값이있는 값의 정수 값 목록을 반환합니다. @weights의 각 가중치. 반환 값 수는 @weights의 요소 수와 같습니다. $ 값은 정수가되어야합니다. Synopsis Math :: Round :: Fair 'Round_fair'를 사용하십시오. 내 $ Cents = 7; 내 @weights = (1, 2, 3, 2, 1); @allocation = ROUTE_FAIR ($ CentS, @weights); "@allocation.을 인쇄하십시오 "# 출력은 다음 중 하나입니다. # 01 32 1 # 02 22 1 # 02 31 1 # 02 32 0 # 11 22 1 # 11 31 1 # 11 32 0 # 12 21 1 # 12 22 0 My @Total; (1..900) {@allocation = round_fair ($ Cents, @weights); @total + = @Allocation 0 .. $ # 할당;} "@Total "# 출력은 * 근처에 * 700140021001400700, 예를 들어, # 698141120961418677 요구 사항 : · Perl.


수학 :: 라운드 :: 공정 관련 소프트웨어

회사 소개