偷偷摘套内射激情视频,久久精品99国产国产精,中文字幕无线乱码人妻,中文在线中文a,性爽19p

R語(yǔ)言利劍之NoSQL系列:Redis

作者：佚名
數(shù)據(jù)庫(kù) Redis
R利劍NoSQL系列文章，主要介紹通過(guò)R語(yǔ)言連接使用NoSQL數(shù)據(jù)庫(kù)。涉及的NoSQL產(chǎn)品，包括Redis, MongoDB, HBase, Hive, Cassandra, Neo4j。希望通過(guò)我的介紹讓廣大的R語(yǔ)言愛(ài)好者，有更多的開(kāi)發(fā)選擇，做出更多地激動(dòng)人心的應(yīng)用。

Redis環(huán)境準(zhǔn)備 rredis函數(shù)庫(kù) rredis基本使用操作 rredis使用案例

每一章節(jié)，都會(huì)分為”文字說(shuō)明部分”和”代碼部分”，保持文字說(shuō)明與代碼的連貫性。

***章 Redis環(huán)境準(zhǔn)備

文字說(shuō)明部分：

首先環(huán)境準(zhǔn)備，這里我選擇了Linux Ubuntu操作系統(tǒng)12.04的64位服務(wù)器版本，大家可以根據(jù)自己的使用習(xí)慣選擇順手的Linux。

 

Redis安裝過(guò)程跳過(guò)。sudo apt-get install redis-server

查看Redis服務(wù)器環(huán)境

使用/etc/init.d/redis-server命令，啟動(dòng)redis-server， 默認(rèn)端口：port=6379

在服務(wù)器端，用telnet連接redis-server

用telnet插入數(shù)據(jù)，讀取數(shù)據(jù)

R語(yǔ)言環(huán)境2.15.0，WinXP通過(guò)遠(yuǎn)程連接，訪(fǎng)問(wèn)Redis server。

代碼部分：

查看操作系統(tǒng) 

  1. ~ uname -a      Linux AY121111030241cda8003 3.2.0-29-generic #46-Ubuntu SMP Fri Jul 27 17:03:23 UTC 2012 x86_64 x86_64 x86_64 GNU/Linux  ~ cat /etc/issue      Ubuntu 12.04.1 LTS \n \l  

啟動(dòng)redis 

  1. ~ /etc/init.d/redis-server start      Starting redis-server: redis-server.  

查看系統(tǒng)進(jìn)程 

  1. ~ ps -aux|grep redis      redis    20128  0.0  0.0  10676  1428 ?        Ss   16:39   0:00 /usr/bin/redis-server /etc/redis/redis.conf  

查看啟日志

  1. ~ cat  /var/log/redis/redis-server.log       
  2. [20128] 14 Apr 16:39:43 * Server started, Redis version 2.2.12     
  3. [20128] 14 Apr 16:39:43 # WARNING overcommit_memory is set to 0! Background save may fail under low memory condition. To fix this issue add 'vm.overcommit_memory = 1' to /etc/sysctl.conf and then reboot or run the command 'sysctl vm.overcommit_memory=1' for this to take effect.    
  4. [20128] 14 Apr 16:39:43 * The server is now ready to accept connections on port 6379  

telnet連接redis-server

  1. ~ telnet localhost 6379      Trying 127.0.0.1...     Connected to localhost.     Escape character is '^]'.  

插入數(shù)據(jù)

  1. rpush data 1     :1      rpush data 2     :2  

查詢(xún)數(shù)據(jù) 

  1. lrange data 0 -1     *2     $1     1     $1     2  

R語(yǔ)言開(kāi)發(fā)環(huán)境2.15.0，WinXP

~ R R version 2.15.0 (2012-03-30) Copyright (C) 2012 The R Foundation for Statistical Computing ISBN 3-900051-07-0 Platform: i386-pc-mingw32/i386 (32-bit)

第二章 rredis函數(shù)庫(kù)

rredis提供了100函數(shù)，對(duì)應(yīng)用redis的操作。雖然函數(shù)也不少，但是用法都是比較簡(jiǎn)單的，對(duì)R語(yǔ)言支持足夠靈活，代碼也比較簡(jiǎn)潔。

下面列出了所有rredis函數(shù)庫(kù)，我只挑選一些常用的介紹。

文字說(shuō)明部分：

建立連接，關(guān)閉連接

  1. redisConnect() , redisClose()  

清空當(dāng)前/所有數(shù)據(jù)庫(kù)數(shù)據(jù) 

  1. redisFlushDB() , redisFlushAll()  

列出所有KEY值，KEY的數(shù)量 

  1. redisKeys(), redisDBSize()  

選擇切換數(shù)據(jù)庫(kù):0是默認(rèn)數(shù)據(jù)庫(kù) 

  1. redisSelect(0)      

插入string對(duì)象，批量插入 

  1. redisSet('x',runif(5)), redisMSet(list(x=pi,y=runif(5),z=sqrt(2)))  

讀取string對(duì)象，批量讀取 

  1. redisGet('x'), redisMGet(c('x','y','z'))  

刪除對(duì)象 

  1. redisDelete('x')  

左邊插入數(shù)組對(duì)象,右邊插入數(shù)組對(duì)象

  1. redisLPush('a',1), redisRPush('a','A')  

左邊彈出一個(gè)數(shù)組對(duì)象， 右邊彈出一個(gè)數(shù)組對(duì)象， 

  1. redisLPop('a'), redisRPop('a')  

從左邊顯示數(shù)組對(duì)象列表 

  1. redisLRange('a',0,-1)  

插入set類(lèi)型對(duì)象 

  1. redisSAdd('A',runif(2))  

顯示set對(duì)象有幾個(gè)元素，列表顯示set對(duì)象元素 

  1. redisSCard('A'), redisSMembers('A')  

顯示兩個(gè)set對(duì)象的差集，交集，并集 

  1. redisSDiff(c('A','B')),redisSInter(c('A','B')),redisSUnion(c('A','B'))  

代碼部分：

共有100個(gè)函數(shù)

redisAuth redisBgRewriteAOF redisBgSave redisBLPop redisBRPop redisBRPopLPush redisClose redisCmd redisConnect redisDBSize 
redisDecr redisDecrBy redisDelete redisDiscard redisEval redisExec redisExists redisExpire redisExpireAt redisFlushAll redisFlushDB 
redisGet redisGetContext redisGetResponse redisGetSet redisHDel redisHExists redisHFields redisHGet redisHGetAll redisHIncrBy redisHKeys 
redisHLen redisHMGet redisHMSet redisHSet redisHVals redisIncr redisIncrBy redisInfo redisKeys redisLIndex redisLLen redisLPop redisLPush 
redisLRange redisLRem redisLSet redisLTrim redisMGet redisMonitorChannels redisMove redisMSet redisMulti redisPublish redisRandomKey 
redisRename redisRPop redisRPopLPush redisRPush redisSAdd redisSave redisSCard redisSDiff redisSDiffStore redisSelect redisSet
 redisSetBlocking redisSetContext redisShutdown redisSInter redisSInterStore redisSIsMember redisSlaveOf redisSMembers redisSMove
 redisSort redisSPop redisSRandMember redisSRem redisSubscribe redisSUnion redisSUnionStore redisTTL redisType redisUnsubscribe 
redisUnwatch redisWatch redisZAdd redisZCard redisZIncrBy redisZInterStore redisZRange redisZRangeByScore redisZRank redisZRem 
redisZRemRangeByRank redisZRemRangeByScore redisZScore redisZUnionStore

第三章 rredis基本使用操作

文字說(shuō)明部分：

首先，要安裝rredis類(lèi)庫(kù)，加載類(lèi)庫(kù)。

redisConnect(host=“192.168.1.101”,port=6379)

然后，通過(guò)redisConnect()函數(shù)，建立與Redis Server的連接。如果是本地連接redisConnect()不要參數(shù)，下面例子使用遠(yuǎn)程連接，增加host參數(shù)配置IP地址。redisConnect(host=“192.168.1.101”,port=6379)

redis的基本操作：建議鏈接，切換數(shù)據(jù)庫(kù)，列表顯示所有KEY值，清空當(dāng)前數(shù)據(jù)庫(kù)數(shù)據(jù)，清空所有數(shù)據(jù)庫(kù)數(shù)據(jù)，關(guān)閉鏈接，

string類(lèi)型操作：插入，讀取，刪除，插入并設(shè)置過(guò)期時(shí)間，批量操作

list類(lèi)型操作：插入，讀取，彈出

set類(lèi)型操作：插入，讀取，交集，差集，并集

rredis與redis-cli的交互操作

代碼部分：

redis的基本操作：

  1. #安裝rredis 
  2. install.packages(rredis) 
  3.  
  4. #加載rredis類(lèi)庫(kù) 
  5. library(rredis) 
  6.  
  7. #遠(yuǎn)程連接redis server 
  8. redisConnect(host="192.168.1.101",port=6379) 
  9.  
  10. #列出所有的keys 
  11. redisKeys() 
  12.     [1] "x"    "data" 
  13.  
  14. #顯示有多少個(gè)key 
  15. redisDBSize() 
  16.     [1] 2 
  17.  
  18. #切換數(shù)據(jù)庫(kù)1 
  19. redisSelect(1) 
  20.     [1] "OK" 
  21. redisKeys() 
  22.     NULL 
  23.  
  24. #切換數(shù)據(jù)庫(kù)0 
  25. redisSelect(0) 
  26.     [1] "OK" 
  27. redisKeys() 
  28.     [1] "x"    "data" 
  29.  
  30. #清空當(dāng)前數(shù)據(jù)庫(kù)數(shù)據(jù) 
  31. redisFlushDB() 
  32.     [1] "OK" 
  33.  
  34. #清空所有數(shù)據(jù)庫(kù)數(shù)據(jù) 
  35. redisFlushAll() 
  36.     [1] "OK" 
  37.  
  38. #關(guān)閉鏈接 
  39. redisClose() 

string類(lèi)型操作:

  1. #插入對(duì)象 
  2. redisSet('x',runif(5)) 
  3.     1] "OK" 
  4.  
  5. #讀取對(duì)象 
  6. redisGet('x') 
  7.     [1] 0.67616159 0.06358643 0.07478021 0.32129140 0.16264615 
  8.  
  9. #設(shè)置數(shù)據(jù)過(guò)期時(shí)間 
  10. redisExpire('x',1) 
  11. Sys.sleep(1) 
  12. redisGet('x') 
  13.     NULL 
  14.  
  15. #批量插入 
  16. redisMSet(list(x=pi,y=runif(5),z=sqrt(2))) 
  17.     [1] TRUE 
  18.  
  19. #批量讀取 
  20. redisMGet(c('x','y','z')) 
  21.     $x 
  22.     [1] 3.141593 
  23.     $y 
  24.     [1] 0.9249501 0.3444994 0.6477250 0.1681421 0.2646853 
  25.     $z 
  26.     [1] 1.414214 
  27.  
  28. #刪除數(shù)據(jù)     
  29. redisDelete('x') 
  30.     [1] 1 
  31. redisGet('x') 
  32.     NULL 

#p#

list類(lèi)型操作

  1. #從數(shù)組左邊插入數(shù)據(jù) 
  2. redisLPush('a',1) 
  3. redisLPush('a',2) 
  4. redisLPush('a',3) 
  5.  
  6. #顯示從數(shù)組左邊0-2的數(shù)據(jù) 
  7. redisLRange('a',0,2) 
  8.     [[1]] 
  9.     [1] 3 
  10.     [[2]] 
  11.     [1] 2 
  12.     [[3]] 
  13.     [1] 1 
  14.  
  15. #從數(shù)據(jù)左邊彈出一個(gè)數(shù)據(jù) 
  16. redisLPop('a') 
  17.     [1] 3 
  18.  
  19. #顯示從數(shù)組左邊0-(-1)的數(shù)據(jù)    
  20. redisLRange('a',0,-1) 
  21.     [[1]] 
  22.     [1] 2 
  23.  
  24.     [[2]] 
  25.     [1] 1 
  26.  
  27. #從數(shù)組右邊插入數(shù)據(jù) 
  28. redisRPush('a','A') 
  29. redisRPush('a','B') 
  30.  
  31. #顯示從數(shù)組左邊0-(-1)的數(shù)據(jù) 
  32. redisLRange('a',0,-1) 
  33.     [[1]] 
  34.     [1] 2 
  35.     [[2]] 
  36.     [1] 1 
  37.     [[3]] 
  38.     [1] "A" 
  39.     [[4]] 
  40.     [1] "B" 
  41.  
  42. #從數(shù)據(jù)右邊彈出一個(gè)數(shù)據(jù) 
  43. redisRPop('a') 

set類(lèi)型操作

  1. redisSAdd('A',runif(2)) 
  2. redisSAdd('A',55) 
  3.  
  4. #顯示對(duì)象有幾個(gè)元素 
  5. redisSCard('A') 
  6.     [1] 2 
  7.  
  8. #列表顯示set對(duì)象元素 
  9. redisSMembers('A') 
  10.     [[1]] 
  11.     [1] 55 
  12.  
  13.     [[2]] 
  14.     [1] 0.6494041 0.3181108 
  15.  
  16. redisSAdd('B',55) 
  17. redisSAdd('B',rnorm(3)) 
  18.  
  19. #顯示對(duì)象有幾個(gè)元素 
  20. redisSCard('B') 
  21.     [1] 2 
  22.  
  23. #列表顯示set對(duì)象元素     
  24. redisSMembers('B') 
  25.     [[1]] 
  26.     [1] 55 
  27.  
  28.     [[2]] 
  29.     [1] 0.1074787 1.3111006 0.8223434 
  30.  
  31. #差集 
  32. redisSDiff(c('A','B')) 
  33.     [[1]] 
  34.     [1] 0.6494041 0.3181108 
  35.  
  36. #交集 
  37. redisSInter(c('A','B')) 
  38.     [[1]] 
  39.     [1] 55 
  40.  
  41. #并集 
  42. redisSUnion(c('A','B')) 
  43.     [[1]] 
  44.     [1] 55 
  45.  
  46.     [[2]] 
  47.     [1] 0.1074787 1.3111006 0.8223434 
  48.  
  49.     [[3]] 
  50.     [1] 0.6494041 0.3181108 

rredis與redis-cli交互

redis客戶(hù)端插入數(shù)據(jù)，rredis讀取數(shù)據(jù)

  1. #打開(kāi)redis客戶(hù)端 
  2. ~ redis-cli 
  3. redis 127.0.0.1:6379> set shell "Greetings, R client!" 
  4.     OK 
  5.  
  6. redisGet('shell') 
  7.     [1] "Greetings, R client!" 

rredis插入數(shù)據(jù)，redis客戶(hù)端讀取數(shù)據(jù)

  1. #插入數(shù)據(jù) 
  2. redisSet('R', 'Greetings, shell client!') 
  3.     [1] "OK" 
  4.  
  5. #讀取數(shù)據(jù)(有亂碼) 
  6. redis 127.0.0.1:6379> get R 
  7.     "X\\x00\x00\x00\x02\x00\x02\x0f\x00\x00\x02\x03\x00\x00\x00\x00\x10\x00\x00\x00\x01\x00\x04\x00\\x00\x00\x00\x18Greetings, shell client!" 

轉(zhuǎn)型以數(shù)組方式存儲(chǔ)(charToRaw)

  1. redisSet('R', charToRaw('Greetings, shell client!')) 
  2.     [1] TRUE 
  3.  
  4. #正常讀取數(shù)據(jù) 
  5. redis 127.0.0.1:6379> get R 
  6.     "Greetings, shell client!" 

第四章 rredis測(cè)試案例

測(cè)試案例的需求：

讀入一個(gè)數(shù)據(jù)文件，從左到右分別是用戶(hù)id，口令，郵箱，在redis里建立合適的數(shù)據(jù)模型，并將這些數(shù)據(jù)導(dǎo)入到redis。

文字說(shuō)明部分：

首先，定義數(shù)據(jù)模型：

KEY:

users:用戶(hù)id

VALUE:

id:用戶(hù)id

pw:口令

email:郵箱

R語(yǔ)言讀入數(shù)據(jù)文件。

然后，建立redis連接，以循環(huán)方式插入數(shù)據(jù)。

以u(píng)sers:wolys為KEY，輸出對(duì)應(yīng)用的VALVE值。

代碼部分

  1. #讀入數(shù)據(jù) 
  2. data<-scan(file="data5.txt",what=character(),sep=" ") 
  3. data<-data[which(data!='#')] 
  4.  
  5. > data 
  6.  
  7.      [1] "wolys"                   "wolysopen111"            "wolys@21cn.com"          
  8.      [4] "coralshanshan"           "601601601"               "zss1984@126.com"         
  9.      [7] "pengfeihuchao"           "woaidami"                "294522652@qq.com"        
  10.     [10] "simulategirl"            "@#$9608125"              "simulateboy@163.com"     
  11.     [13] "daisypp"                 "12345678"                "zhoushigang_123@163.com" 
  12.     [16] "sirenxing424"            "tfiloveyou"              "sirenxing424@126.com"    
  13.     [19] "raininglxy"              "1901061139"              "lixinyu23@qq.com"        
  14.     [22] "leochenlei"              "leichenlei"              "chenlei1201@gmail.com"   
  15.     [25] "z370433835"              "lkp145566"               "370433835@qq.com"        
  16.     [28] "cxx0409"                 "12345678"                "cxx0409@126.com"         
  17.     [31] "xldq_l"                  "061222ll"                "viv093@sina.com"   
  18.  
  19. #連接redis連接 
  20. redisConnect(host="192.168.1.101",port=6379) 
  21. redisFlushAll() 
  22. redisKeys() 
  23.  
  24. #循環(huán)插入數(shù)據(jù) 
  25. id<-NULL 
  26. for(i in 1:length(data)){ 
  27.   if(i %% 3 == 1) { 
  28.     id<-data[i] 
  29.     redisSAdd(paste("users:",id,sep=""),paste("id:",id,sep="")) 
  30.   } else if(i %% 3 == 2) { 
  31.     redisSAdd(paste("users:",id,sep=""),paste("pw:",data[i],sep="")) 
  32.   } else { 
  33.     redisSAdd(paste("users:",id,sep=""),paste("email:",data[i],sep="")) 
  34.   } 
  35. } 
  36.  
  37. #列出所有的KEY 
  38. redisKeys() 
  39.  
  40.      [1] "users:cxx0409"       "users:sirenxing424"  "users:simulategirl"  "users:xldq_l"        
  41.      [5] "users:coralshanshan" "users:raininglxy"    "users:pengfeihuchao" "users:leochenlei"    
  42.      [9] "users:daisypp"       "users:wolys"         "users:z370433835"    
  43.  
  44. #通過(guò)KEY查詢(xún)VALUE 
  45. redisSMembers("users:wolys") 
  46.  
  47.     [[1]] 
  48.     [1] "pw:wolysopen111" 
  49.  
  50.     [[2]] 
  51.     [1] "email:wolys@21cn.com" 
  52.  
  53.     [[3]] 
  54.     [1] "id:wolys" 
  55.  
  56. #關(guān)閉redis連接 
  57. redisClose() 

完成測(cè)試案例。

數(shù)據(jù)文件：data5.txt

  1. wolys # wolysopen111 # wolys@21cn.com 
  2. coralshanshan # 601601601 # zss1984@126.com 
  3. pengfeihuchao # woaidami # 294522652@qq.com 
  4. simulategirl # @#$9608125 # simulateboy@163.com 
  5. daisypp # 12345678 # zhoushigang_123@163.com 
  6. sirenxing424 # tfiloveyou # sirenxing424@126.com 
  7. raininglxy # 1901061139 # lixinyu23@qq.com 
  8. leochenlei # leichenlei # chenlei1201@gmail.com 
  9. z370433835 # lkp145566 # 370433835@qq.com 
  10. cxx0409 # 12345678 # cxx0409@126.com 
  11. xldq_l # 061222ll # viv093@sina.com 

原文鏈接：http://cos.name/2013/04/nosql-r-redis/ 

【責(zé)任編輯：彭凡 TEL：（010）68476606】

責(zé)任編輯：彭凡 來(lái)源： 統(tǒng)計(jì)之都
R語(yǔ)言
相關(guān)推薦

2014-07-31 09:13:54

R語(yǔ)言MongoDB

2019-03-20 15:59:11

NoSQLRedis數(shù)據(jù)庫(kù)

2013-04-10 10:31:21

R語(yǔ)言

2011-07-06 16:36:40

Redis

2017-10-17 11:58:54

R語(yǔ)言UpSetR可視化

2013-05-31 10:15:29

R語(yǔ)言

2021-05-18 07:15:37

Python

2013-05-16 09:37:14

R語(yǔ)言

2010-08-31 09:11:58

2010-03-11 14:37:47

Visual StudScrum

2012-08-29 16:41:44

信息安全RSA華為

2017-11-17 18:40:54

華為

2013-05-24 10:01:40

R語(yǔ)言

2011-05-16 10:29:44

HandlerSockNoSQL

2011-07-13 09:58:15

HBase

2011-08-01 08:56:06

CouchDBSQLiteNoSQL

2018-03-12 22:13:46

GO語(yǔ)言編程軟件

2014-07-11 10:09:30

2023-11-29 16:20:21

2021-12-22 07:31:18

RedisNoSQL數(shù)據(jù)庫(kù)
點(diǎn)贊
收藏

51CTO技術(shù)棧公眾號(hào)