我可以使用列表作为R中的哈希吗？如果是,为什么这么慢？

例如，以下代码将填充最多10000个键/值对的散列，其中键是随机字母，值是随机整数。然后，它在该哈希中执行10000次随机查找。

#!/usr/bin/perl -w
use strict;

my @letters = ('a'..'z');

print @letters . "n";
my %testHash;

for(my $i = 0; $i < 10000; $i++) {
    my $r1 = int(rand(26));
    my $r2 = int(rand(26));
    my $r3 = int(rand(26));
    my $key = $letters[$r1] . $letters[$r2] . $letters[$r3];
    my $value = int(rand(1000));
    $testHash{$key} = $value;
}

my @keyArray = keys(%testHash);
my $keyLen = scalar @keyArray;

for(my $j = 0; $j < 10000; $j++) {
    my $key = $keyArray[int(rand($keyLen))];
    my $lookupValue = $testHash{$key};
    print "key " .  $key . " Lookup $lookupValue n";
}

现在越来越多，我想在R中有一个类似哈希的数据结构。以下是等效的R代码：

testHash <- list()

for(i in 1:10000) {
  key.tmp = paste(letters[floor(26*runif(3))],sep="")
  key <- capture.output(cat(key.tmp,sep=""))
  value <- floor(1000*runif(1))
  testHash[[key]] <- value
}

keyArray <- attributes(testHash)$names
keyLen = length(keyArray);

for(j in 1:10000) {
  key <- keyArray[floor(keyLen*runif(1))]
  lookupValue = testHash[[key]]
  print(paste("key",key,"Lookup",lookupValue))
}

代码似乎在做同等的事情。然而，Perl一个快得多：

>time ./perlHashTest.pl
real    0m4.346s
user    **0m0.110s**
sys 0m0.100s

与R比较：

time R CMD BATCH RHashTest.R

real    0m8.210s
user    **0m7.630s**
sys 0m0.200s

什么解释了差异？在R列表查找只是不好吗？

增加到100,000列表长度和100,000次查找只夸大了差异？是否有更好的替代R的哈希数据结构比本机list()？