数学建模社区-数学中国

标题: sas 程序急问---订单中水果的各种组合计数 [打印本页]
作者: bunny2012    时间: 2012-9-28 12:52
标题: sas 程序急问---订单中水果的各种组合计数
各位大虾，现在要给订单中水果的各种组合计数，我要崩溃了。& J5 ~$ a- h- M" _
之前有一位好心人提供帮助，可惜结果不对。 请高人帮忙吧  ！. p* L& e! l7 R5 W

9 y  C, F$ e; S$ M订单如下：大概是同一个客人在同一天可能挑几种不同的水果买。总共有很多水果，客人是随便买的，但有的水果组合出现的次数比别的组合高。将同一个客人在同一天购买的几种水果视为一个组合。5 _: k8 E) x, c  |# i8 S. d
要统计的结果主要想体现出水果间的相关性。最后将找出相关性最大的水果（即 出现次数最多的组合）
! t7 D3 N! f5 C$ q8 J+ Q 1、计算所有水果组合的出现总次数，找出最受欢迎的组合。 5 _5 O8 t. s. s% C( w) Y+ e% J
2、制成一个水果二维表。对角线表示组合里只有一种水果（同一个客人在同一天即只买了此种水果）。其他表示组合里同时出现这两种水果的次数。（当然有的人一天买多于2种）% M, _2 m9 y0 r4 H" X+ u- L
1 d# E0 T) x5 n6 D: F3 r  ]
表结构：
4 j, @4 A5 K  M( C$ S fruit  apple  kiwi ... grape      
- E6 r# @! E- Y6 h/ e apple  组合里只有苹果              
5 f3 n- l5 E. Q( ^ kiwi                                  % K& Z" I4 b0 ?3 N( ]# u" }  N& R
.                                     5 G" G7 W3 T- k' g1 l) A- B7 e
.                                  $ Q  X: t4 b5 H
grape  组合里同时有苹果和葡萄的次数
% S8 ^5 N- U/ i6 V/ `; d
2 R0 r4 n1 O. @7 q& m4 I8 U  W! y8 z( K: z% \
订单部分如下：' r& S+ x& ^* L
customer   fruit       qty     date        
) q5 A  \% {) g. c/ N( d3 O 001        apple       17     20120101     
* I5 l7 M6 n: P2 W, `" A7 f* G0 d 001        kiwi        17     20120101     ( p! p2 Y0 b! Q8 P5 w! n  M5 z
001        grape       17     20120101     
4 f) R0 P7 i* y+ j# E 001        pear        23     20120129     : @) ]; f6 @- ^  i6 r+ M/ U% D' N+ y1 u
001        banana      10     20120211     ) R" P$ S# ]0 }0 D5 @6 o; j
001        kiwi        10     20120211     1 t' |- T: P& O
001        pear        15     20120211     1 L( W% M  J" T+ P
001        pear        15     20120222     
/ O- l% v! M" Y6 U, p 001        banana      10     20120222     
$ O2 Y4 V+ k2 k; r: V 001        lemon       22     20120711     
( T5 J& s0 j5 x5 M2 q9 \$ s 002        kiwi        22     20120217     / `( d& q; y9 A+ D8 }' i) k
002        kiwi        29     20120320     ( {5 |; s  R- b3 P, P9 q% |
002        corn        29     20120320     ( J; \! ^9 o9 Z7 V: i7 C
002        peach       29     20120320     
* u4 h/ I2 E1 q 002        pear        15     20120322     3 f9 {' O+ e/ m" @: ?- j
002        banana      10     20120322     7 \$ r/ x) b2 \( Q) ^
002        grape       22     20120424     
! W5 o5 a/ l, B' }2 ? 002        orange      29     20120424     
, X4 l& s7 I) F1 N5 s2 g3 u$ o  Z 002        banana      29     20120424     
4 t% l- O0 u2 R% |0 `% d4 F 002        peach       29     20120424     
: ~9 C+ R# n# w6 i 003        pear        15     20120122     $ s$ x: N5 K9 p0 Z
003        banana      10     20120122     
3 X1 O7 Z: h* G3 T0 W2 G  y 003        apple       11     20120201     
) w% i4 b2 J9 L. Z# N& S* j; {. v 003        plum        11     20120211     
4 G6 Z, \* V; r% @6 y# [) s 003        kiwi        11     20120201     6 f8 \$ P5 ^& K9 S3 k2 z
003        grape       11     20120201     
, f6 Z, L; X  E& k 003        cherry      24     20120213     ; m5 ]) G! V8 i$ x  Z
003        apple       32     20120213     % j4 W9 C5 y, q& z
003        grape       44     20120412     % Y5 d; d/ {( }& v
003        pear        15     20120922     
5 \" p5 Z" K& G  x 003        banana      10     20120922     ! Q9 J, a) c1 U- T; a1 H! F; f
004        pineapple   12     20120206     
7 {% c0 Z- O; p' z# C$ a! b- r 004        plum        31     20120219     ; o+ ]# a0 I5 k8 d3 _! R
004        banana      29     20120424     
3 J# @* {- ]( u  {  H 004        peach       29     20120424     / ?3 e3 l" }) h/ b3 U, y. u9 c. P
004        pear        15     20120424     " j/ A% l/ o" f' T! x
004        pear        15     20120522     . t) K8 @1 F* }0 D4 {) R, u) F
004        banana      10     20120522     
) t* L7 b6 x, a 004        apple       22     20120601       r$ u% x* c, \$ |( p
004        kiwi        22     20120601     
4 m; k, _& w2 g* `' z. ]2 ` 004        grape       22     20120601     6 A2 n3 s) k, c. `9 }9 `
005        cherry      24     20120203     
5 _2 s% v3 c3 z2 c4 i! m 005        apple       32     20120203     " ?' y& z6 p$ [+ c$ `- P; X' a
005        pear        15     20120322     , l7 m8 }: M' [) w4 u7 s
005        banana      10     20120322     
& n0 q9 h5 d3 e 005        orange      20     20120411     ! N& u) q+ Z+ M9 `2 y, T
005        cherry      30     20120421     $ p+ X) d, E' H, ]5 ~
005        apple       22     20120601     
0 \) j+ ?% h& m( v2 R2 L 005        kiwi        22     20120601     
& }# t) v8 W1 ?+ b1 m5 `) `! q 005        grape       22     20120601     # `/ S/ P$ E2 i0 e
005        kiwi        25     20120616     % D, U3 B# W: x( m
005        grape       25     20120616# x* q! B1 `" A% e' d




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