数学建模社区-数学中国

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

作者: forcal    时间: 2011-11-20 20:28
标题: Lu系统扩展动态库LuSystem之字典
    字典(dict)是一个可直接存取的双向链表,可以存放若干任意的Lu数据。字典元素由“键-值”对组成,键只能是字符串,但值可以是任何Lu数据类型。  Q' i' q# V7 t+ E, B( H5 m
' A) G) L# T8 @* n2 y. e9 u
    (1)新建字典
  1. !!!using("sys");
    $ Q! {2 M+ ~$ T
  2. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典,有2组初始化数据。函数o用于输出字典。
复制代码
用函数dict生成字典更为方便:
  1. !!!using("sys");
      p0 P' R, H. }5 ~: U6 l
  2. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典,有2组初始化数据。函数o用于输出字典。
复制代码
(2)得到字典元素
  1. !!!using("sys");
    ' U3 }+ z, j, L8 a# k
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];
复制代码
(3)增加字典元素
  1. !!!using("sys");3 i/ |0 |; ?! Y( Y, [6 y5 K' F8 X
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];
复制代码
说明:当往字典中增加元素时,若已存在该键,则进行更新。
0 Q/ {7 P3 p- q
, Q9 Y" V# `% s* N9 _( Z    (4)删除字典
: `# h9 ~9 |9 {6 E/ Q$ _7 M
0 A; g- t/ J+ K    删除指定键-值对:a.dict_del["aa","abc"];
- b; ?+ `. ?% Q2 A* N
; k% ?3 Q2 i% b$ X6 k3 v4 c    清空字典:a.dict_clear();
& P' |6 n9 {" \& \! m1 {8 N6 q0 }# d9 V
    删除字典对象,但暂存在缓冲区:del[a];
$ Y, \( f5 |9 m' ~' b6 M4 l# e" `' Q( Y6 F+ [3 z+ ?# ~
    立即彻底删除字典对象:delete[a];
( v; u* n0 n& R" i" e  [5 A  W/ `! G; T. g: p& f# W* z
    (5)字典反序
  1. !!!using("sys");- a6 B% V3 a0 V& ]
  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");
    2 |: v4 F1 l6 H1 [8 t  E( {
  2. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,8 N( w0 \  ?- n4 C& [1 G$ ^: g
  3.   i=0, while{++i<=100, str[1]=i,8 {9 H6 J- L! Q% Q% Y) E
  4.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}# h' d6 Y% ]& I2 C% N4 @
  5.   },
    2 F+ r  G8 i9 [* x
  6.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    ; x! W' q* U  D- G  p; k* m) D
  7.   t0=clock(), sum=0,
    - ?) J8 ]# C4 R, d- h
  8.   i=0, while{++i<=100, str[1]=i,. b  s$ y7 S8 u
  9.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}+ C7 c. Y6 s8 v
  10.   },
    $ e+ N* ~; V! J
  11.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};
复制代码
结果:
  1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
    4 ~. `1 j3 h9 H2 ?
  2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000
复制代码





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