This is a specialized function for use in connection with text reordering. It takes the output from the image annotation tool 'Labelme' https://github.com/wkentaro/labelme and turns it into a one-row data frame compatible with other 'daiR' functions for text reordering such as reassign_tokens2(). See package vignette on text reconstruction for details.

from_labelme(json, page = 1)

Arguments

json

a json file generated by 'Labelme'

page

the number of the annotated page

Value

a data frame with location coordinates for the rectangle marked in 'Labelme'.

Examples

if (FALSE) { # \dontrun{
new_block <- from_labelme("document1_blocks.json")
new_block <- from_labelme("document5_blocks.json", 5)
} # }