[datatable-help] Bug in data.table crashes R

[steve border]

Hi,
I have a reproducible problem, detailed below, that causes R to crash (the 
please tell Microsoft dialog appears). Please let me know if there is anything 
else I can supply to help.

Best Regards,
-Steve


I start R thus:-
"C:\Program Files\R\R-2.11.1\bin\Rgui.exe" --vanilla

> version
              _                            
platform      i386-pc-mingw32              
arch          i386                        
os            mingw32                      
system        i386, mingw32                
status                                      
major          2                            
minor          11.1                        
year          2010                        
month          05                          
day            31                          
svn rev        52157                        
language      R                            
version.string R version 2.11.1 (2010-05-31)

> installed.packages()
          Package      LibPath                          Version      Priority 
    
...
data.table "data.table" "C:/PROGRA~1/R/R-211~1.1/library" "1.4.1"      NA      
    
...


Here is my PC system summary (from msinfo32):-

OS NameMicrosoft Windows XP Professional
Version5.1.2600 Service Pack 3 Build 2600
OS ManufacturerMicrosoft Corporation
Activation StatusActivation Pending (30 days remaining)
System NameSTEVE
System ManufacturerDell Inc.
System ModelPrecision WorkStation T3400
System TypeX86-based PC
Processorx86 Family 6 Model 23 Stepping 10 GenuineIntel ~2826 Mhz
BIOS Version/DateDell Inc. A08, 14/08/2008
SMBIOS Version2.5
Windows DirectoryC:\WINDOWS
System DirectoryC:\WINDOWS\system32
Boot Device\Device\HarddiskVolume2
LocaleUnited States
Hardware Abstraction LayerVersion = "5.1.2600.5512 (xpsp.080413-2111)"
User NameSTEVE\Steve
Time ZoneW. Europe Daylight Time
Total Physical Memory4,096.00 MB
Available Physical Memory1.10 GB
Total Virtual Memory2.00 GB
Available Virtual Memory1.96 GB
Page File Space5.09 GB
Page FileC:\pagefile.sys


## Fragment of R code provoking the crash:-

require(data.table)
last.nz=function(x){a=x[x>0]; a[length(a)]};

otxt=data.table(read.csv('c:/dev/data_table_bug/otxt.csv')); # I have appended 
this file at the end of this mail.

uu=otxt[,j=list(avg_price=last.nz(avg_price)),by=id]; # Crashes executing this 
statement.

## The text file:-

$ cat otxt.csv
"","id","avg_price"
"1","MAN00002",0
"2","MAN00002",3.43
"3","ALT00006",0
"4","ALT00006",33.38
"5","ALT00006",33.3339473684211
"6","ALT00006",33.3244444444444
"7","ALT00006",33.3623008849558
"8","ALT00006",33.3666666666667
"9","ALT00006",33.3728571428571
"10","ALT00015",0
"11","ALT00015",16.46
"12","ALT00015",16.445
"13","ALT00015",16.4444927536232
"14","ALT00015",16.44
"15","ALT00015",16.4375
"16","BYB00002",0
"17","BYB00002",48.26
"18","BYB00002",48.26
"19","BYB00002",48.26
"20","ALT00017",0
"21","ALT00017",36.61
"22","ALT00017",36.61
"23","ALT00017",36.61
"24","ALT00017",36.61
"25","ALT00018",0
"26","ALT00018",15.81
"27","ALT00018",15.81
"28","ALT00018",15.81
"29","ALT00018",15.81
"30","ALT00018",15.81
"31","ALT00019",0
"32","ALT00019",31.11
"33","ALT00020",0
"34","ALT00020",17.71
"35","ALT00021",0
"36","ALT00021",30.45
"37","ALT00021",30.45
"38","ALT00020",17.71
"39","ALT00020",17.71
"40","ALT00020",17.71
"41","ALT00023",0
"42","ALT00023",22.37
"43","ALT00023",22.37
"44","ALT00023",22.37
"45","ALT00023",22.37
"46","ALT00023",22.37
"47","ALT00024",0
"48","ALT00024",29.27
"49","ALT00024",29.265
"50","ALT00024",29.2566666666667
"51","ALT00024",29.2525
"52","NWI00003",0
"53","NWI00003",7.87
"54","NWI00003",7.87
"55","NWI00003",7.87
"56","NWI00003",7.87
"57","NWI00003",7.87
"58","NWI00003",7.87
"59","ALT00027",0
"60","ALT00027",18.22
"61","ALT00027",18.22
"62","ALT00027",18.2266666666667
"63","ALT00027",18.23
"64","ALT00030",0
"65","ALT00030",18.07
"66","ALT00030",18.065
"67","ALT00030",18.0616666666667
"68","ALT00030",18.05875
"69","ALT00031",18.05875
"70","ALT00031",18.05875
"71","ALT00032",0
"72","ALT00032",18.18
"73","ALT00032",18.18
"74","ALT00032",18.18
"75","ALT00034",0
"76","ALT00034",45.94
"77","ALT00035",0
"78","ALT00035",45.76
"79","ALT00036",0
"80","ALT00036",15.38
"81","ALT00036",15.3775
"82","ALT00036",15.3766666666667
"83","ALT00036",15.3757971014493
"84","ALT00036",15.3756179775281
"85","ALT00036",15.3745871559633
"86","ALT00036",15.3741666666667
"87","ALT00036",15.3735714285714
"88","ALT00036",15.371875
"89","ALT00036",15.3694444444444
"90","ALT00036",15.3675
"91","ALT00037",15.3675
"92","ALT00038",0
"93","ALT00037",15.3675
"94","ALT00038",15.36
"95","ALT00038",15.3581967213115
"96","ALT00038",15.355
"97","ALT00038",15.3533333333333
"98","ALT00038",15.355
"99","ALT00038",15.356
"100","NWI00005",0
"101","NWI00005",32.49
"102","NWI00005",32.49
"103","ALT00042",0
"104","ALT00042",55.84
"105","ALT00043",0
"106","ALT00043",9.65
"107","ALT00044",0
"108","ALT00044",20.69
"109","ALT00043",9.65
"110","ALT00043",9.65
"111","ALT00043",9.65
"112","ALT00043",9.65
"113","ALT00043",9.65
"114","ALT00043",9.65
"115","ALT00045",20.69
"116","ALT00045",20.69
"117","ALT00045",20.495
"118","ALT00045",20.4939800995025
"119","ALT00045",20.4266666666667
"120","NWC00002",0
"121","NWC00002",16.77
"122","NWC00002",16.775
"123","NWC00002",16.7733333333333
"124","NWC00002",16.7725
"125","ALT00047",0
"126","ALT00047",41.33
"127","ALT00047",41.33
"128","NWI00007",0