R: uöpload implementation