数学建模社区-数学中国

标题: Lu系统扩展动态库LuSystem之字典 [打印本页]
作者: forcal    时间: 2011-11-20 20:28
标题: Lu系统扩展动态库LuSystem之字典
    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
) }9 d- h2 K) V' w5 f* M; D! Z( a5 H4 o( W
    （1）新建字典
  1. !!!using("sys");& Y, Q8 h& O0 V. {
  2. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
用函数dict生成字典更为方便：
  1. !!!using("sys");9 n7 x: \- L5 ~, P( [/ T: h1 w
  2. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。
复制代码
（2）得到字典元素
  1. !!!using("sys");. D# I2 S) n( Z5 q' \
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];
复制代码
（3）增加字典元素
  1. !!!using("sys");
    . s& t3 W- N8 D, T9 R
  2. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];
复制代码
说明：当往字典中增加元素时，若已存在该键，则进行更新。- W9 s, X4 k- ^% Z0 |) O' c
% a/ E( o, r' y4 @6 S! Z
    （4）删除字典
" V5 a! N  Z3 E
* |. A2 {1 F' E4 B1 J4 [* O    删除指定键－值对：a.dict_del["aa","abc"];: o" l; c: L( z) {4 Y2 z

/ S9 e4 ^% }8 w8 M% ^% T8 z/ N    清空字典：a.dict_clear();
; C' @3 K$ {, G) g- m5 O3 Z" g9 b, B( r: n
    删除字典对象，但暂存在缓冲区：del[a];" D, o) e) J  S, O5 m7 E
, U0 q. A; C! \5 J' @7 {% c: ^
    立即彻底删除字典对象：delete[a];
& f) ?/ h3 R1 W' @& u/ o8 O5 b. D0 ~3 m  S) L! F7 n% x' H' J% k8 ^
    （5）字典反序
  1. !!!using("sys");
    # j8 h0 F" o& k% [
  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");$ w6 }. `1 n3 o2 C  f$ p
  2. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,) V. w+ H, P" O; l0 O
  3.   i=0, while{++i<=100, str[1]=i,
    3 v+ w5 t; f/ g$ E
  4.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}) M4 c# ^* j5 y7 d# b$ U; N
  5.   },
    . Y) x6 a+ a0 r) m* u
  6.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    & B8 K6 ?! {7 K8 F) @# O) }7 y
  7.   t0=clock(), sum=0,3 }% l- S  x  J/ ~" Y8 U% v5 e1 H
  8.   i=0, while{++i<=100, str[1]=i,
    4 @" D7 g# l2 R5 y, A( d
  9.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}1 \; ?1 u8 \$ ?/ |5 f+ a
  10.   },
    : `6 ?" g8 [! \4 r; U$ F( \* q6 a
  11.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};
复制代码
结果：
  1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=1550000006 \* |$ ]9 y( \3 a
  2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000
复制代码




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