diff --git a/Datanalitica.package/DiscourseTopic.class/instance/addKeyword.to..st b/Datanalitica.package/DiscourseTopic.class/instance/addKeyword.to..st index 26d5e49..4ad05a9 100644 --- a/Datanalitica.package/DiscourseTopic.class/instance/addKeyword.to..st +++ b/Datanalitica.package/DiscourseTopic.class/instance/addKeyword.to..st @@ -1,5 +1,3 @@ accessing addKeyword: keyword to: subtopic - self subtopics - at: subtopic put: keyword; - yourself. \ No newline at end of file + (self subtopics at: subtopic) add: keyword. \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPI.class/instance/userMentionsFor..st b/Datanalitica.package/TwitterAPI.class/instance/userMentionsFor..st index 9efe433..2ea7009 100644 --- a/Datanalitica.package/TwitterAPI.class/instance/userMentionsFor..st +++ b/Datanalitica.package/TwitterAPI.class/instance/userMentionsFor..st @@ -1,5 +1,4 @@ accessing userMentionsFor: username - | rawResponse queryURL | "The following query gets the last 100 mentions that is the maximun allowed for a particular user without pagination:" ^ self userQueryFor: username selecting: 'mentions' \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPI.class/instance/userQueryFor.selecting..st b/Datanalitica.package/TwitterAPI.class/instance/userQueryFor.selecting..st index 450f1a6..fa9d2d5 100644 --- a/Datanalitica.package/TwitterAPI.class/instance/userQueryFor.selecting..st +++ b/Datanalitica.package/TwitterAPI.class/instance/userQueryFor.selecting..st @@ -4,4 +4,7 @@ userQueryFor: username selecting: tweetsOrMentions "The following query gets the last 100 tweets or mentions that is the maximun allowed for a particular user without pagination:" queryURL := self userEndPointFor: username selecting: tweetsOrMentions. rawResponse := self rawResponseForURL:queryURL. - ^ TwitterAPIResponse new fromDictionary: (STONJSON fromString: rawResponse) \ No newline at end of file + ^ TwitterAPIResponse new + fromDictionary: (STONJSON fromString: rawResponse); + queryURL: queryURL; + date: DateAndTime now. \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPI.class/instance/usersGroupMentioning..st b/Datanalitica.package/TwitterAPI.class/instance/usersGroupMentioning..st index 25e9cbd..36c294b 100644 --- a/Datanalitica.package/TwitterAPI.class/instance/usersGroupMentioning..st +++ b/Datanalitica.package/TwitterAPI.class/instance/usersGroupMentioning..st @@ -1,5 +1,8 @@ accessing usersGroupMentioning: userName + | response | + response := self userQueryFor: userName selecting: 'mentions'. ^ TwitterUsersGroup new - users: (self usersMentioning: userName); - title: 'Users mentioning @', userName \ No newline at end of file + users: response messagesAuthors; + title: 'Users mentioning @', userName; + origin: response queryURL \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/instance/date..st b/Datanalitica.package/TwitterAPIResponse.class/instance/date..st new file mode 100644 index 0000000..9d04a8e --- /dev/null +++ b/Datanalitica.package/TwitterAPIResponse.class/instance/date..st @@ -0,0 +1,4 @@ +accessing +date: aDateAndTime + "As answers to the same query can change over time, for example regarding deteled users, its important to know where a query was ran." + date := aDateAndTime \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/instance/date.st b/Datanalitica.package/TwitterAPIResponse.class/instance/date.st new file mode 100644 index 0000000..c536804 --- /dev/null +++ b/Datanalitica.package/TwitterAPIResponse.class/instance/date.st @@ -0,0 +1,3 @@ +accessing +date + ^ date \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/instance/fromQueryURL..st b/Datanalitica.package/TwitterAPIResponse.class/instance/fromQueryURL..st new file mode 100644 index 0000000..b86e6c5 --- /dev/null +++ b/Datanalitica.package/TwitterAPIResponse.class/instance/fromQueryURL..st @@ -0,0 +1,3 @@ +accessing +fromQueryURL: aQueryURLString + \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL..st b/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL..st new file mode 100644 index 0000000..4fc36ca --- /dev/null +++ b/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL..st @@ -0,0 +1,3 @@ +accessing +queryURL: aQueryURLString + queryURL := aQueryURLString \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL.st b/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL.st new file mode 100644 index 0000000..34197cb --- /dev/null +++ b/Datanalitica.package/TwitterAPIResponse.class/instance/queryURL.st @@ -0,0 +1,3 @@ +accessing +queryURL + ^ queryURL \ No newline at end of file diff --git a/Datanalitica.package/TwitterAPIResponse.class/properties.json b/Datanalitica.package/TwitterAPIResponse.class/properties.json index 463b718..767ab7d 100644 --- a/Datanalitica.package/TwitterAPIResponse.class/properties.json +++ b/Datanalitica.package/TwitterAPIResponse.class/properties.json @@ -8,7 +8,9 @@ "instvars" : [ "data", "includes", - "meta" + "meta", + "queryURL", + "date" ], "name" : "TwitterAPIResponse", "type" : "normal" diff --git a/Datanalitica.package/TwitterUsersGroup.class/README.md b/Datanalitica.package/TwitterUsersGroup.class/README.md index e69de29..d1f8f68 100644 --- a/Datanalitica.package/TwitterUsersGroup.class/README.md +++ b/Datanalitica.package/TwitterUsersGroup.class/README.md @@ -0,0 +1,5 @@ +I model a group of Twitter users. Generally I am the result of running a query on the Twitter API or refining over another +Twitter users group. + +I have methods that allow the running of such queries and making visualizations on particular properties of my users +or their tweets and in the future I will support topic modelling. \ No newline at end of file diff --git a/Datanalitica.package/TwitterUsersGroup.class/instance/origin..st b/Datanalitica.package/TwitterUsersGroup.class/instance/origin..st new file mode 100644 index 0000000..c1a36f6 --- /dev/null +++ b/Datanalitica.package/TwitterUsersGroup.class/instance/origin..st @@ -0,0 +1,4 @@ +accessing +origin: anObject + + origin := anObject \ No newline at end of file diff --git a/Datanalitica.package/TwitterUsersGroup.class/instance/origin.st b/Datanalitica.package/TwitterUsersGroup.class/instance/origin.st new file mode 100644 index 0000000..132b402 --- /dev/null +++ b/Datanalitica.package/TwitterUsersGroup.class/instance/origin.st @@ -0,0 +1,4 @@ +accessing +origin + + ^ origin \ No newline at end of file diff --git a/Datanalitica.package/TwitterUsersGroup.class/properties.json b/Datanalitica.package/TwitterUsersGroup.class/properties.json index f33278e..fead877 100644 --- a/Datanalitica.package/TwitterUsersGroup.class/properties.json +++ b/Datanalitica.package/TwitterUsersGroup.class/properties.json @@ -1,5 +1,5 @@ { - "commentStamp" : "", + "commentStamp" : "", "super" : "Object", "category" : "Datanalitica-Datanalitica", "classinstvars" : [ ], @@ -8,7 +8,8 @@ "instvars" : [ "users", "title", - "discourseTopics" + "discourseTopics", + "origin" ], "name" : "TwitterUsersGroup", "type" : "normal"