R/getGrandParent.R

getGrandParent = function(x){
  foo <- synGet(x,downloadFile=F)
  bar <- synGet(properties(foo)$parentId,downloadFile=F)
  return(properties(bar)$parentId)
}
Sage-Bionetworks/synapseUtilities documentation built on May 9, 2019, 12:15 p.m.