# Get Quad IJ coordinates for a cell
result <- hexify_cell_to_quad_ij(cell_id = 1000, resolution = 10, aperture = 3)
print(result)
# Round-trip test
cell_id <- hexify_quad_ij_to_cell(result$quad, result$i, result$j,
resolution = 10, aperture = 3)
# Should equal original cell_id
Run the code above in your browser using DataLab