search for: combinedata

...t(as.matrix(storelatlon)), as.matrix(custlatlon), miles=F)[whichval]) storetag <- as.data.frame(cbind(1:nrow(dist),storelist[j,1])) fincalc <- as.data.frame(cbind(1:nrow(dist),(customerlist[whichval,1]),rdist.earth(t(as.matrix(storelatlon)), as.matrix(custlatlon), miles=F)[whichval])) combinedata <- data.frame(storetag, fincalc) combinefinal <- subset(combinedata, select= c(-1,-3)) flush.console() write.table(combinefinal, file = outfile, append=TRUE, sep=",", col.names=FALSE) } }

Hello everyone, I have two sets of data, with the following structure: DataSet1 Location Part Sample 1 Sample 2 A 1 value value A 2 value value A 3 value value B 1 value value DataSet2 Location Sample 1 Sample 2 A