Displaying 1 result from an estimated 1 matches for "intersectitem".
2012 May 14
2
Error in names(x) <- value: 'names' attribute must be the same length as the vector
...the Item name is unique for every row)
NArows <- prevdf[apply(prevdf, 1, function(y) sum(!is.na(y))==1),]
#if NAs rows is not equal to zero
if (nrow(NArows) != 0 )
{
#find the rows in the current CSV file where there is missing data in
prevdf (this info is in NArows)
intersectItem<- intersect(currentCSVFile$Item, NArows$Item)
#initiate another data frame to put the data in
newdf.int <- data.frame(Item=c(), Color=c(), Number=c(), Size=c())
print(nrow(currentCSVFile))
for (i in 1:nrow(currentCSVFile))
{
print("In loop")...