| drop dataverse twitter if exists; |
| create dataverse twitter; |
| use dataverse twitter; |
| |
| create type TweetbookEntry as open { |
| tweetid: string, |
| comment-text: string |
| } |
| |
| create type TwitterUserType as open { |
| screen-name: string, |
| lang: string, |
| friends_count: int32, |
| statuses_count: int32, |
| name: string, |
| followers_count: int32 |
| } |
| |
| create type TweetMessageType as closed { |
| tweetid: string, |
| user: TwitterUserType, |
| sender-location: point?, |
| send-time: datetime, |
| referred-topics: {{ string }}, |
| message-text: string |
| } |
| |
| create dataset TweetMessages(TweetMessageType) |
| primary key tweetid; |
| |
| create dataset TweetMessagesShifted(TweetMessageType) |
| primary key tweetid; |
| |
| load dataset TweetMessages using localfs |
| (("path"="localhost://FULL_PATH/twm.adm"),("format"="adm")); |
| |
| insert into dataset TweetMessagesShifted |
| ( |
| for $t in dataset TweetMessages return { |
| "tweetid" : $t.tweetid, |
| "user" : $t.user, |
| "sender-location" : create-point(get-x($t.sender-location), -1*get-y($t.sender-location)), |
| "send-time" : $t.send-time, |
| "referred-topics": $t.referred-topics, |
| "message-text": $t.message-text |
| } |
| ); |