数学建模社区-数学中国

标题: sas 程序急问---订单中水果的各种组合计数 [打印本页]
作者: bunny2012    时间: 2012-9-28 12:52
标题: sas 程序急问---订单中水果的各种组合计数
各位大虾，现在要给订单中水果的各种组合计数，我要崩溃了。- @5 ]: r+ o8 |. I4 n) C
之前有一位好心人提供帮助，可惜结果不对。 请高人帮忙吧  ！
' H$ u' J, W* w( J- }4 D% n- H) d4 {+ A
订单如下：大概是同一个客人在同一天可能挑几种不同的水果买。总共有很多水果，客人是随便买的，但有的水果组合出现的次数比别的组合高。将同一个客人在同一天购买的几种水果视为一个组合。
3 k6 W8 l6 C% j' S$ [+ \ 要统计的结果主要想体现出水果间的相关性。最后将找出相关性最大的水果（即 出现次数最多的组合）5 B9 W- C. L( d- k  v3 K
1、计算所有水果组合的出现总次数，找出最受欢迎的组合。 ! Q! [2 s9 U3 k7 c
2、制成一个水果二维表。对角线表示组合里只有一种水果（同一个客人在同一天即只买了此种水果）。其他表示组合里同时出现这两种水果的次数。（当然有的人一天买多于2种）) X, ~  N% J* w" M# M) F

) N7 w# O7 ]: r) U# @& u5 }表结构：
  E! m: e* Q" j, C6 H fruit  apple  kiwi ... grape      7 S5 W$ }% X9 ~: p. \
apple  组合里只有苹果              / I! j5 F4 ^; z7 n& |0 N# ?8 \
kiwi                                  - b4 L3 m7 L9 Y2 C& k! O$ r) [
.                                    
5 |( U: q5 F9 t) \, L.                                 
7 C( D! ^% p8 Vgrape  组合里同时有苹果和葡萄的次数
* L6 \. O/ u4 n. u0 T* m" s
- r) r* F. r2 d
% s* ~$ x, |' \7 z: N订单部分如下：
9 B2 ^; q% o% n: X! u( P- [' U customer   fruit       qty     date        8 W# A2 w9 v" c; v* ]2 O
001        apple       17     20120101     
. s7 Z5 m& E5 {3 @6 a 001        kiwi        17     20120101     . Z3 j8 `6 h- P& z" e
001        grape       17     20120101     
& i4 M3 \! \) J$ ~' z' q% w 001        pear        23     20120129     
9 B3 v% x) H0 I8 y5 u! K 001        banana      10     20120211     
$ D3 x, s0 s7 f 001        kiwi        10     20120211     8 {  ]6 h4 ?. a0 f- f& j
001        pear        15     20120211     $ W& g/ {# N$ v6 z1 ^: \
001        pear        15     20120222     - i' x, d/ x" m3 L/ {
001        banana      10     20120222     * B) r0 X1 j  C1 _2 k
001        lemon       22     20120711     % T' t4 q  {- ]2 r: ?. h
002        kiwi        22     20120217     ! N1 a. c9 S6 f3 p2 A: s  j# P# `
002        kiwi        29     20120320     
. I6 |: L6 l5 Z! [! a 002        corn        29     20120320     
* Z$ U" d+ x8 n 002        peach       29     20120320     + z; _  ]# H# x: f# `) p
002        pear        15     20120322     
& y% _, U6 W8 r* h+ N, Z2 ` 002        banana      10     20120322     
2 x+ r; F! t7 r 002        grape       22     20120424     
# {0 j* p2 w, W  R  K; P$ v! F' J4 L  x7 s$ O 002        orange      29     20120424     , r3 X  B0 \$ u0 ^: |
002        banana      29     20120424     % _. P) B0 `+ E5 u! V* Y* m
002        peach       29     20120424     
" Z0 |" L& f7 x/ }7 D% M$ J 003        pear        15     20120122     0 D8 v  M, S, d& A5 t9 I* d
003        banana      10     20120122     ! S4 l5 [$ t4 ]; B
003        apple       11     20120201     * t6 _" H. i; L: ?; A* R* [, t
003        plum        11     20120211     
) a$ \( Y; l6 D* L 003        kiwi        11     20120201     
/ B7 ?) G8 ~, M9 Y: n9 N 003        grape       11     20120201     
  a0 `2 ~& v5 K4 `6 |9 m 003        cherry      24     20120213     
9 L  v# C% p/ l# _0 G$ E5 B 003        apple       32     20120213     / ~. g  @: M& `$ ^" q7 R
003        grape       44     20120412     . M  k- A( h( n2 N. F" Q9 [0 F
003        pear        15     20120922     " g1 `' v% _7 [
003        banana      10     20120922     
# f. H( y) @/ W% E7 b 004        pineapple   12     20120206     , P' j% @" N' E1 ~! G4 N  s
004        plum        31     20120219     7 R5 s6 b( x, C, |* a% p) B
004        banana      29     20120424     3 h, w1 m) F. g5 b
004        peach       29     20120424     
' C3 L; H* r7 _* n# j  Y; H9 g 004        pear        15     20120424     + {+ x6 H0 k. i3 }- M) }
004        pear        15     20120522     ! S+ o( R$ B- ~$ O. K+ ^: Y
004        banana      10     20120522     
& J8 K# u4 g/ Z7 s! k9 X( I 004        apple       22     20120601       m" p2 G8 R! j  i: r% c
004        kiwi        22     20120601     3 Y; t' p3 K$ T8 K! |* Q* t" M
004        grape       22     20120601     
8 G; b# b# F/ b6 C% D 005        cherry      24     20120203     / L/ a* P: R5 Q' D6 b3 E% `
005        apple       32     20120203     9 r6 m' O# F8 b* `- g) k4 G6 N
005        pear        15     20120322     
: t6 X+ H) f7 m 005        banana      10     20120322     
& a) X3 P+ R: m3 |& D0 R! T 005        orange      20     20120411     * k- g9 j5 U. P: N- X0 K: w9 ^
005        cherry      30     20120421     . g$ L2 g4 j' ]. i7 \1 i
005        apple       22     20120601     " ^3 K) p; l$ b1 f6 F
005        kiwi        22     20120601     
2 S  {6 g, `- f! c1 k# S* S 005        grape       22     20120601     
  C; S9 x( S$ b3 N  M2 h( h 005        kiwi        25     20120616     
# ?6 D, o2 o) u8 k' V/ r7 d" E 005        grape       25     201206160 Q; n% ^& z. I




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