数学建模社区-数学中国

标题: sas 程序急问---订单中水果的各种组合计数 [打印本页]
作者: bunny2012    时间: 2012-9-28 12:52
标题: sas 程序急问---订单中水果的各种组合计数
各位大虾，现在要给订单中水果的各种组合计数，我要崩溃了。
5 A, [/ m( B# p+ i2 \0 G5 Y& n之前有一位好心人提供帮助，可惜结果不对。 请高人帮忙吧  ！
& I1 d  v- m/ V$ Q) W! \7 C7 d4 z+ ~- J* L2 }1 {
订单如下：大概是同一个客人在同一天可能挑几种不同的水果买。总共有很多水果，客人是随便买的，但有的水果组合出现的次数比别的组合高。将同一个客人在同一天购买的几种水果视为一个组合。
) I3 c0 t0 {% \8 V! t4 e: \1 j6 L 要统计的结果主要想体现出水果间的相关性。最后将找出相关性最大的水果（即 出现次数最多的组合）6 B( s* Z/ Y4 V6 B
1、计算所有水果组合的出现总次数，找出最受欢迎的组合。
, t  F  s5 y2 K: z9 R6 [0 z1 S4 K2、制成一个水果二维表。对角线表示组合里只有一种水果（同一个客人在同一天即只买了此种水果）。其他表示组合里同时出现这两种水果的次数。（当然有的人一天买多于2种）
* s* b& h  J+ o+ E; `
9 Y7 [' s* j) z, q表结构：
6 {% R! o/ h* y fruit  apple  kiwi ... grape      
* i, ~9 I! x. G4 s% n apple  组合里只有苹果              - `2 Q1 {# m' `! t4 `
kiwi                                 
) x- M! `0 V4 N( r1 B7 K9 M! o.                                    
% T% K% {$ {! \4 e. {.                                  & C6 u3 s4 O1 k5 x2 H, u
grape  组合里同时有苹果和葡萄的次数
9 s0 l" f' j( L9 [
" L" R4 d* i7 `1 d- U: x
" B' A, w, Q. \" \# O6 z订单部分如下：
4 W: K2 ~; w7 i* d' f customer   fruit       qty     date        
; a( k2 I: S3 @! q7 Q( @# j; B 001        apple       17     20120101     
+ W/ c( o2 l, m 001        kiwi        17     20120101     
  g- e" W" R4 R( E2 b 001        grape       17     20120101     ) o: Z- i( r5 G' s' ^6 z+ z' w
001        pear        23     20120129     * f9 h1 N. I9 C4 y1 U% |
001        banana      10     20120211     3 L; p' Q. ^5 p/ B- W2 ]+ z
001        kiwi        10     20120211     4 P7 D! m6 t7 n- S& H& r
001        pear        15     20120211     
9 E# ^) |# f. V6 B4 `5 c 001        pear        15     20120222     0 x$ {* q! x1 L( }- x
001        banana      10     20120222     
; v+ p6 j2 f" ~6 O* ]( p 001        lemon       22     20120711     
4 U1 [, U- U" I 002        kiwi        22     20120217     5 L8 c/ M9 H& _% i2 z
002        kiwi        29     20120320     
9 [7 I3 c7 @9 F) c" j 002        corn        29     20120320     
' h+ d" t/ ]1 S, k# b 002        peach       29     20120320     1 L8 `  P% {* J* e8 i1 ~6 s
002        pear        15     20120322     ! b# A0 P& Q3 w" ]6 R) B6 L
002        banana      10     20120322     
5 k- N) E: H; o% V* O/ {& m$ D 002        grape       22     20120424     
  z  K) r: n2 C) T$ I 002        orange      29     20120424     5 z) h2 I5 t: ]. t% m9 }4 \9 u' _. {
002        banana      29     20120424     . C2 `' u- j3 m* X5 L
002        peach       29     20120424     
2 ]4 K4 y6 d# O! Y" s5 Y3 k 003        pear        15     20120122     
1 u' n: M8 @2 d% J  r1 M 003        banana      10     20120122     
, d5 @; D6 Z, G1 l1 B4 A- ` 003        apple       11     20120201     8 ^: i3 [4 Y. Q# f! l
003        plum        11     20120211     
0 L0 G- p4 y- R% p/ K 003        kiwi        11     20120201     ( M/ w) x3 q. s/ C2 @6 c# y; |
003        grape       11     20120201     $ k; m; N. q+ W% s% D
003        cherry      24     20120213     
4 c( q+ {, A; ~7 j2 B' m' [ 003        apple       32     20120213     1 u/ v  g: l( V8 p1 z
003        grape       44     20120412     
. A2 d; B& v7 a 003        pear        15     20120922     
7 k) W* P3 E- e5 C2 T6 A 003        banana      10     20120922     9 I4 t0 G! a7 _- i' |
004        pineapple   12     20120206     
7 r9 a* v) P% t0 } 004        plum        31     20120219     & d. `: H/ o/ i/ e+ j. _
004        banana      29     20120424     2 S' E, M  b7 B% X+ z
004        peach       29     20120424     
* g1 v# @: ?; q! l 004        pear        15     20120424     
5 Q* ^( X, m* f+ p 004        pear        15     20120522     1 p) b* a$ @: o
004        banana      10     20120522     
9 R( s9 I: u5 c2 y/ C4 c6 G3 i 004        apple       22     20120601     
, I4 b0 G7 \) @( \ 004        kiwi        22     20120601     
. W) r) A( q+ g1 P; ]  ^0 `0 U, r# d 004        grape       22     20120601     
. Q2 a( W# [8 d+ a, `3 H) d 005        cherry      24     20120203     
" h, z' j5 b, T+ e- R1 H# Z 005        apple       32     20120203     
- @( r' g0 a4 I 005        pear        15     20120322     ' k8 `4 I+ i! d0 W- ]) }7 W7 Z
005        banana      10     20120322     
4 M# d# x2 v! w 005        orange      20     20120411     
3 |! e: `* Z: D9 E- z 005        cherry      30     20120421     
* k& b4 Q0 f- l& ?# r+ W4 l( v 005        apple       22     20120601     + Z5 k5 k6 f4 ?. P+ V
005        kiwi        22     20120601     : i: Z. K) B( L- ^( p
005        grape       22     20120601     ) j( _1 f6 R4 d) {: Q: B
005        kiwi        25     20120616     $ T! L+ x2 ~" O8 d4 g4 b$ r
005        grape       25     20120616- r6 ^( f6 H) O* _5 h5 b




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5