数学建模社区-数学中国

标题: Lu系统扩展动态库LuSystem之字典 [打印本页]

作者: forcal    时间: 2011-11-20 20:28
标题: Lu系统扩展动态库LuSystem之字典
    字典(dict)是一个可直接存取的双向链表,可以存放若干任意的Lu数据。字典元素由“键-值”对组成,键只能是字符串,但值可以是任何Lu数据类型。
7 h. k# ~  Y3 l! E3 x
: F. k3 e7 B1 ^  g% ^4 m/ q+ \  c    (1)新建字典
  1. !!!using("sys");$ T! I3 d7 V0 Y* V
  2. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典,有2组初始化数据。函数o用于输出字典。
复制代码
用函数dict生成字典更为方便:
  1. !!!using("sys");
    ! H, M: ?  a$ L& V" q- Q3 Y3 n
  2. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典,有2组初始化数据。函数o用于输出字典。
复制代码
(2)得到字典元素
  1. !!!using("sys");
    " n- ]5 J% i" n- X
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];
复制代码
(3)增加字典元素
  1. !!!using("sys");( x) s  E; p* n& k; b
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];
复制代码
说明:当往字典中增加元素时,若已存在该键,则进行更新。
. v7 ^: K# f/ }" L9 V) D6 I
: T. |* M1 P6 U" r. }0 ?8 I' [    (4)删除字典4 o# W8 r1 S( U+ `
% m1 t8 e5 C5 t9 B" ^* E7 V- K
    删除指定键-值对:a.dict_del["aa","abc"];
4 H6 r3 s/ r! n: g+ g- n6 V% ~! u+ w$ u4 D' M7 O% |* `
    清空字典:a.dict_clear();
* W% p) j* m7 ^; o2 W- Y- X, E3 j8 X" R, y
    删除字典对象,但暂存在缓冲区:del[a];7 M; w$ Z4 O2 l: n# g4 \2 q# @2 W

  |4 A: \) @2 T. s    立即彻底删除字典对象:delete[a];
: V1 Z! A  v: w& w0 c0 S3 R6 a) m/ m. i) y# H" `% ~' c
    (5)字典反序
  1. !!!using("sys");+ m" z7 c! \% r4 |. @" G
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];
复制代码
结果:
  1. dict{aa : 1.2 , abc : luu}dict{abc : luu , aa : 1.2}
复制代码
(6)字典存取效率测试:在字典a中添加若干元素,元素的键通过变换字符串str的值得到,sum用于求所有元素的值的和。
  1. !!!using("sys");/ G7 X* s" z$ N9 U- a5 _1 h
  2. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
    # t8 V: I+ A* D1 ], @
  3.   i=0, while{++i<=100, str[1]=i,. n: @; x+ f( j! a/ V8 m& j* ?# e
  4.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}$ O8 p: f4 N+ B* i+ z7 ], t
  5.   },
    / e1 x; L' F8 A4 H; p- u# t7 G
  6.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    / R+ X! l6 F* O* S- Q( F
  7.   t0=clock(), sum=0,& W. S  F4 Q  P
  8.   i=0, while{++i<=100, str[1]=i,
    - h0 b  I0 S( ?7 X" @4 R( ~
  9.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}( z6 v9 F% F; E& h7 Z, ^
  10.   },
    ; a5 P$ _3 e5 D4 z) x9 S
  11.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};
复制代码
结果:
  1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
    ! I9 ^7 u2 l# r8 a
  2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000
复制代码





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