Skip to content

Instantly share code, notes, and snippets.

@coolbutuseless

coolbutuseless/RTriangle-bug.R

Created October 4, 2020 22:31
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save coolbutuseless/dd5dd52c20b0b6d668cca8ffb9897ff0 to your computer and use it in GitHub Desktop.
Save coolbutuseless/dd5dd52c20b0b6d668cca8ffb9897ff0 to your computer and use it in GitHub Desktop.
Download ZIP
RTriangle bug reprex
Raw
RTriangle-bug.R
raw_vec <- as.raw(
c(0x42, 0x0a, 0x03, 0x00, 0x00, 0x00, 0x02, 0x00, 0x04,
0x00, 0x00, 0x05, 0x03, 0x00, 0x05, 0x00, 0x00, 0x00, 0x55, 0x54,
0x46, 0x2d, 0x38, 0x13, 0x03, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00,
0x0e, 0x02, 0x00, 0x00, 0x0c, 0x00, 0x00, 0x00, 0x46, 0x17, 0x5d,
0x74, 0xd1, 0x45, 0xa7, 0x3f, 0x8b, 0x2e, 0xba, 0xe8, 0xa2, 0x8b,
0xee, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x3f, 0x74,
0xd1, 0x45, 0x17, 0x5d, 0x74, 0xd1, 0x3f, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0xe0, 0x3f, 0x46, 0x17, 0x5d, 0x74, 0xd1, 0x45, 0xe7,
0x3f, 0x46, 0x17, 0x5d, 0x74, 0xd1, 0x45, 0xa7, 0x3f, 0x46, 0x17,
0x5d, 0x74, 0xd1, 0x45, 0xa7, 0x3f, 0x8c, 0x2e, 0xba, 0xe8, 0xa2,
0x8b, 0xee, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x3f,
0x46, 0x17, 0x5d, 0x74, 0xd1, 0x45, 0xa7, 0x3f, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0xe0, 0x3f, 0x02, 0x04, 0x00, 0x00, 0x01, 0x00,
0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x03, 0x00, 0x00, 0x00, 0x64,
0x69, 0x6d, 0x0d, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x06,
0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x02, 0x04, 0x00, 0x00,
0x01, 0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x08, 0x00, 0x00,
0x00, 0x64, 0x69, 0x6d, 0x6e, 0x61, 0x6d, 0x65, 0x73, 0x13, 0x00,
0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x06,
0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00,
0x31, 0x09, 0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00, 0x32, 0x09,
0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00, 0x33, 0x09, 0x00, 0x04,
0x00, 0x01, 0x00, 0x00, 0x00, 0x34, 0x09, 0x00, 0x04, 0x00, 0x01,
0x00, 0x00, 0x00, 0x35, 0x09, 0x00, 0x04, 0x00, 0x01, 0x00, 0x00,
0x00, 0x36, 0x10, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x09,
0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00, 0x78, 0x09, 0x00, 0x04,
0x00, 0x01, 0x00, 0x00, 0x00, 0x79, 0xfe, 0x00, 0x00, 0x00, 0x0e,
0x02, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02, 0x04, 0x00, 0x00,
0xff, 0x01, 0x00, 0x00, 0x0d, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00,
0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfe, 0x00,
0x00, 0x00, 0x0d, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x0d, 0x02, 0x00, 0x00, 0x0c, 0x00, 0x00, 0x00, 0x01, 0x00,
0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x04,
0x00, 0x00, 0x00, 0x05, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00,
0x02, 0x00, 0x00, 0x00, 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00,
0x00, 0x05, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x04, 0x00,
0x00, 0x00, 0x02, 0x04, 0x00, 0x00, 0xff, 0x01, 0x00, 0x00, 0x0d,
0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00,
0x02, 0x00, 0x00, 0x00, 0xfe, 0x00, 0x00, 0x00, 0x0d, 0x00, 0x00,
0x00, 0x06, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0e, 0x02, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x02, 0x04, 0x00, 0x00, 0xff, 0x01, 0x00,
0x00, 0x0d, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0xfe, 0x00, 0x00, 0x00, 0x02,
0x04, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00,
0x05, 0x00, 0x00, 0x00, 0x6e, 0x61, 0x6d, 0x65, 0x73, 0x10, 0x00,
0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x01,
0x00, 0x00, 0x00, 0x50, 0x09, 0x00, 0x04, 0x00, 0x02, 0x00, 0x00,
0x00, 0x50, 0x41, 0x09, 0x00, 0x04, 0x00, 0x02, 0x00, 0x00, 0x00,
0x50, 0x42, 0x09, 0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00, 0x53,
0x09, 0x00, 0x04, 0x00, 0x02, 0x00, 0x00, 0x00, 0x53, 0x42, 0x09,
0x00, 0x04, 0x00, 0x01, 0x00, 0x00, 0x00, 0x48, 0x02, 0x04, 0x00,
0x00, 0x01, 0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x05, 0x00,
0x00, 0x00, 0x63, 0x6c, 0x61, 0x73, 0x73, 0x10, 0x00, 0x00, 0x00,
0x01, 0x00, 0x00, 0x00, 0x09, 0x00, 0x04, 0x00, 0x04, 0x00, 0x00,
0x00, 0x70, 0x73, 0x6c, 0x67, 0xfe, 0x00, 0x00, 0x00)
)
P <- unserialize(raw_vec)
RTriangle::triangulate(P)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment