###############################################################
# Invoke required library #
###############################################################
require("tm")||install.packages("tm")
## Loading required package: tm
## Loading required package: NLP
## [1] TRUE
require("rJava")||install.packages("rJava")
## Loading required package: rJava
## [1] TRUE
require("wordcloud")||install.packages("wordcloud")
## Loading required package: wordcloud
## Loading required package: RColorBrewer
## [1] TRUE
require("textir")||install.packages("textir")
## Loading required package: textir
## Loading required package: distrom
## Loading required package: Matrix
## Loading required package: gamlr
## Loading required package: parallel
## [1] TRUE
require("RWeka")||install.packages("RWeka")
## Loading required package: RWeka
## [1] TRUE
require("qdap")||install.packages("qdap")
## Loading required package: qdap
## Loading required package: qdapDictionaries
## Loading required package: qdapRegex
## Loading required package: qdapTools
##
## Attaching package: 'qdap'
## The following object is masked from 'package:Matrix':
##
## %&%
## The following objects are masked from 'package:tm':
##
## as.DocumentTermMatrix, as.TermDocumentMatrix
## The following object is masked from 'package:NLP':
##
## ngrams
## The following object is masked from 'package:base':
##
## Filter
## [1] TRUE
require("maptpx")||install.packages("maptpx")
## Loading required package: maptpx
## Loading required package: slam
## [1] TRUE
library("tm")
library("rJava")
library("wordcloud")
library("textir")
library("RWeka")
library("qdap")
library("maptpx")
#############################################################
# Attach userdefined functions #
#############################################################
setwd('C:/Praison/AA/DataSciencesLab/TextMining')
#source(file.choose()) # Select text_functions.R
source('text_functions.R')
############################################################
# Read the Text Data in R #
############################################################
text = readLines (file.choose()) # Select txt file you want to analyse
head(text)
## [1] "\"result.1\",\"The first disc features 11 deleted and extended scenes. There's more of the opening ambush with Tony Stark being more proactive. We also see more footage of Rhodes and it quickly becomes apparent that he was the character with the most scenes cut from the film. We also see Tony and Pepper Potts attend another party.<br /><br />The second disc starts off with the impressive \"\"I Am Iron Man,\"\" a 108 minute making of documentary that can be viewed in seven segments or altogether, taking us through various aspects of the production. For example, we are taken step-by-step through the construction of the Iron Man armor with Robert Downey Jr. cracking jokes while being fitted for it. It's amazing how much of the suit is practical and looks really good in person. This is due in large part to the genius of the late-great Stan Winston and his company. Also included is plenty of soundstage footage of scenes being filmed.<br /><br />\"\"The Invincible Iron Man\"\" is a six-part documentary on the comic book, tracing the history of the character. Stan Lee says that he modeled Stark after Howard Hughes, for the most part. He also mentions that he was never fully satisfied with the look of the armor - hence its many changes over the years. This doc also covers various key characters and storylines in excellent detail with several people who worked on the title over the years talking about their contribution to the mythos. This is a very well done overview of the comic book.<br /><br />\"\"Wired: The Visual Effects of Iron Man\"\" examines the CGI work that went into realizing Iron Man's powers, like flying, his repulsors, and so on. Director Jon Favreau says that he likes to use practical effects whenever possible, which is wonderfully refreshing to hear, and in this film he mixed the practical with CGI.<br /><br />\"\"Robert Downey Jr. Screen Test.\"\" Incredibly, the actor had to do a screen test because the studio deemed him a risky proposition and this footage shows that he had a handle on the character very early on.<br /><br />\"\"The Actor's Process\"\" features fascinating footage of Jeff Bridges and Downey rehearsing a scene with Favreau. It's great to see these guys at work and offers insight into how they put together a scene from the film from an acting point-of-view.<br /><br />\"\"The Onion's Wildly Popular Iron Man Trailer to be Adapted into Full-Length Film\"\" is a funny satire where a newscaster \"\"breaks\"\" a story of how the Iron Man trailer will be made into a film that pokes fun at the rabid nature of the hardcore fanbase of the character.<br /><br />Finally, there are \"\"Galleries,\"\" featuring concept art, technology stills, behind-the-scenes photographs, and poster art.\""
## [2] "\"result.2\",\"This is a great superhero film that the whole family can enjoy.<br /><br />If you are wondering what the special features on the 2-disc DVD are, here they are:<br /><br />The IRON MAN Ultimate Edition two-DVD set is presented in widescreen enhanced for 16:9 televisions with Dolby Digital English 5.1 Surround, French 5.1 Surround and Spanish 5.1 Surround with English, French and Spanish subtitles. Total runtime is 125 minutes. Bonus features include:<br /><br />Disc 1:<br /><br />Feature film<br />Deleted/Extended Scenes<br /><br />Disc 2:<br /><br />I Am Iron Man<br />-- The Journey Begins<br />-- The Suit that makes the Iron Man<br />-- The Walk of Destruction<br />-- Grounded In Reality<br />-- Beneath the Armor<br />-- It's All in the Details<br />-- A Good Story, Well Told<br /><br />The Invincible Iron Man<br />-- Origins<br />-- Friends & Foes<br />-- The Definitive Iron Man<br />-- Demon in a Bottle<br />-- Extremis and Beyond<br />-- Ultimate Iron Man<br />Wired: The Visual Effects of Iron Man<br />Robert Downey Jr. Screen Test<br />The Actor's Process (scene rehearsal with cast)<br />The Onion \"\"Wildly Popular Iron Man Trailer to be Adapted into Full Length Film\"\"<br />Image Galleries\""
## [3] "\"result.3\",\"There was a big question mark looming over the theatrical adaptation of Marvel's Iron Man property. It was in the guise of director Jon Favreau. Now, don't get me wrong, I love the Favs, but when I heard he was helming a big budget comic book flick...let's just say I was a little worried. Once his cast was set and the fanboys started humming across the internet I started to ease into the decision with high anticipation. Thankfully, after finally seeing the finished product, I was not disappointed in the least. With a great mix of the professionalism and stakes seen in both Spider-Man and X-Men and the comic wit and sheer fun of Fantastic Four, Iron Man shows how a comic can be brought to the screen successfully without all the added drama and weight. We finally have a film with the essence of what makes these picture books so popular, the action and mythology along with a sense of adventure and humor. Favreau never bogs us down with overwrought emotions nor speaks down to us with gags and poorly written jokes. Instead he delivers on his promises and gives us a solid initiation into what could be a great trilogy or more.<br /><br />Favreau seems to have had an idea to get an origin story out while not boring us with long drawn out back story. His ability to give us dual information at once is nicely orchestrated, showing Tony Stark in his basement creating while the TV in the background explains what is happening in the outside world of the Middle East and inside his own company. We as an audience are allowed to put the pieces together amidst the witty banter of Stark and the wonderful special effects. By the end of the film it is quite amazing how much information you will realize you now know, all culminating in a decent final battle, but more importantly a segue into the inevitable sequel. We are allowed entrance into the character evolution of Stark as he goes from war profiteer to man of action and cause, all while seeing the technology improve and advance before our eyes. Much like Batman, we have a hero here that needs help in fighting crime. He has no superhuman abilities besides his brain and being able to see his thoughts go from paper to reality is a feat of magic. Every stage is shown, every failure and success. It's quite the ride in and of itself, but when you add onto it the threat of global war and destruction, it can only get better.<br /><br />The real success here is in the bold move of casting an actor over-40 to be a superhero. This takes guts, because no matter how appropriate it is, most studios would have said, \"\"no, change the story and make him younger so we can churn out as many of these babies as we can.\"\" I don't know how he did it, but Favreau got Marvel to get Robert Downey Jr. to play Stark, a sarcastic Lothario with the brain capacity of Einstein. I truly can't think of anyone better suited to the role and he proves it by nailing every single scene. I'm sure there was some ad-libbing, but even if not, his comic delivery and ability to switch on a dime to a sincere seriousness at will shows his masterful craft.<br /><br />As for the rest of the cast, they all do well. Jeff Bridges plays the bombastic creature of villainy over-the-top, but appropriately so; Terrence Howard is nice as the friend and military liaison, not given much to do, but definitely sowing seeds for the future; and Gwyneth Paltrow is good as the sweet assistant Pepper Potts who at times seems a little underwritten and more female prop than anything else, but comes through with some nice moments in a very comic sort of way. I also really liked Shaun Toub as Yinsen, Stark's savior, and Clark Gregg as the head of S.H.I.E.L.D. Good to see Favreau giving another actor turned director props, (Gregg's directorial debut comes out later this year in the form of Chuck Palahniuk's Choke). I just wish he would have shied away from putting himself in the film. It's one thing to be seen split-second, (like Stan Lee), but its another to give yourself a thankless role with multiple scenes, just adding fuel to the fire on people's opinions of egotism stemming from the drinking game created off of the TV show \"\"Dinner for Five\"\" and how many references to Swingers was made each episode. I'll forgive, though, because, once again, I'm a big fan.<br /><br />One can't forget that this is an action film above all else, so we can't just praise the actors; every effect is also quite brilliant. Those scenes of Iron Man flying amongst fighter jets in the trailer seemed really lame, but when in context they deliver. The suit itself is amazing as well, through every mach stage right to the end. My main highlight, however, was with the computer systems that Stark utilizes. The multiple screens, instant holographic reproductions, and ability to actually interact with those 3D representations is stunning. We can create them in fantasy, but it's just too bad we can't yet in real life.<br /><br />Now Iron Man is not a perfect film, nor even a perfect comic book adaptation. What it is, though, is a fun, comic actioner that should light up the box office. The final showdown is a bit of a whimper in comparison to the back story and machine creation; a crucial element is saved from destruction in the one contrived bit of screen writing, (not quite utilized in the way I thought, although still for the same means); and some moments seem a tad campy rather than witty, but otherwise this is some topnotch cinema that should definitely be seen on the big screen. I can't wait to see how the story progresses in a couple years.\""
## [4] "\"result.4\",\"Once again I begin with a warning that you need to sit through the really, really long credits for what might be the best cameo appearance since Sean Connery showed up as King Richard the Lionheart at the end of \"\"<a href=\"\"http://www.amazon.com/gp/product/B000092T6M/ref=cm_cr_asin_lnk\"\">Robin Hood - Prince of Thieves</a>.\"\" That was the last time I remember people really applauding a cameo in a film, although I should point out that everybody left at the end of the first showing of \"\"Iron Man\"\" were True Believers who instantly recognized the actor and the character as soon as the first words were out of their mouth. Ironically, the cameo by Stan Lee in the film seemed to go right by the audience, because there was no reaction to what was a pretty good gag (it happens when Stark shows up at the big party).<br /><br />Now that I have that bit of business out of the way, let me say that \"\"Iron Man\"\" is the best comic book superhero movie I have seen since \"\"<a href=\"\"http://www.amazon.com/gp/product/B00005JMQW/ref=cm_cr_asin_lnk\"\">Spider-Man 2</a>.\"\" I would say that the latter is better, mainly on the strength of Alfred Molina's wonderful performance as the villain and the great fight sequences between Spidey and Doc Ock that take place on the vertical as well as the horizontal axis, but \"\"Iron Man\"\" might be the more solid film (i.e., lower top but higher bottom). There was a point when the number of comic books that Marvel was putting out exploded (e.g., the New Universe titles) and I dispaired over all of the idiotic cloning with Spider-Man and was down to reading only two Marvel titles: <a href=\"\"http://www.amazon.com/gp/product/0785107576/ref=cm_cr_asin_lnk\"\">Daredevil</a> and <a href=\"\"http://www.amazon.com/gp/product/078512764X/ref=cm_cr_asin_lnk\"\">Iron Man</a>. This was back when Frank Miller was doing DD and Tony Stark was a full-blown alcoholic. Daredevil might have been cooler, but as Iron Man, Stark always had the advantage that he was a regular guy, by which I mean that he did not have any superpowers. He was just a really smart guy who could invent the gadgets that would make Iron Man work (eat your heart out <a href=\"\"http://www.amazon.com/gp/product/B000294TC4/ref=cm_cr_asin_lnk\"\">Ned Kelly</a>). That is certainly what we get with director Jon Favreau's pre-summer blockbuster, with the added angst of Stark growing a conscience and using his armored alter-ego to help restore balance to his own little corner of the universe at war.<br /><br />Ultimately the best parts of the movie are the opening act, in which Stark is captured (Afghanistan today instead of Vietnam of the Sixties)and has to built the metallic grey Tin Woodsman on roids prototype armor, and the second act, where he works out the new suit. This movie has two or three of the best violent slapstick gags you have ever seen in one of these movies, which engenders some of the biggest laughs. The origin of the character is fairly faithful, for being updated, to what happened in \"\"Tales of Suspense\"\" #39, which was plotted by Stan Lee, scripted by his brother Larry Leiber, drawn by Don Heck, with a cover art by Jack Kirby (who created the character's original look, although it was Steve Ditko who first drew the red and gold armored version). There certainly is more than a touch of \"\"<a href=\"\"http://www.amazon.com/gp/product/B000VR0570/ref=cm_cr_asin_lnk\"\">Transformers</a>\"\" to the way Stark dons the Iron Man armor, but as much as I would give credit to the specific effects in this movie, attention must be paid to the screenwriting teams of Mark Fergus & Hawk Ostby (\"\"<a href=\"\"http://www.amazon.com/gp/product/B000N6TX1I/ref=cm_cr_asin_lnk\"\">Children of Men</a>\"\") and Art Marcum & Matt Holloway. For all of the humor in the script, there is a strong thread of serious stuff extending throughout this film.<br /><br />As Tony Stark, Robert Downey, Jr., a superb actor whose skills in the verbal repartee department were honed on \"\"<a href=\"\"http://www.amazon.com/gp/product/B000V8952K/ref=cm_cr_asin_lnk\"\">Ally McBeal</a>,\"\" may well be the most glib superhero we have seen on the silver screen. Certainly he is more glib than we would every have suspected Stark to be, but of course Downey's personal life clearly echoes the character ark of his character (it is that resonance as well as his undeniable talents that make him perfect for the role). As Pepper Potts, Gwenyth Paltrow is more of a romantic figure for Stark than she was in the <a href=\"\"http://www.amazon.com/gp/product/0785118608/ref=cm_cr_asin_lnk\"\">comic book</a>, especially since Happy Hogan (director Favreau) has been relegated to a minor role as Stark's bodyguard to make room for the character of Jim Rhodes. However, the point is not so much potential romance as it is the fact that with Paltrow we have an actress who can go toe to toe with Downey in quick paced nuanced conversation (although many will think that Downey's best scenes are with his robotic assistant with the fire extinguisher). Besides, by have Rhodes instead of Hogan we not only get another acting talent on the level of the Downey and Paltrow with Terrence Howard, but as fans of the comic book know (and the movie acknowledges), one day down the road Jim is going to get to be in the red and gold suit.<br /><br />Obadiah Stane (Jeff Bridges) is set up as a godfather to Tony Stark and a regent to Stark Industries instead of being a rival munitions magnate, which provides a bit of Oedipal conflict to the proceedings and compels the big fight at the end to be with Iron Monger (I was actually hoping for Titanium Man even though I was half expecting the Mandarian). But most people who come to see this movie are not going to know any of this stuff, and even most of the comic book fans who will end up making repeat trips to the theater to see this one are not going to be old enough to remember the original Virginia \"\"Pepper\"\" Potts who ended up with Happy Hogan versus the \"\"<a href=\"\"http://www.amazon.com/gp/product/0785121382/ref=cm_cr_asin_lnk\"\">The Ultimates</a>\"\" version of the character. All that really matters is that the cast and characters are a perfect mesh and the people who put this movie together should be thinking not just about a sequel but about a series. With this launching platform, Iron Man could well replace Superman in the Big Three of comic book superheroes in the movies along with Spider-Man and Batman.\""
## [5] "\"result.5\",\"Reviewers who received advanced copies of the Iron Man Blu-ray release reported that the Dynamic Range Compression (DRC) flag was active on the Dobly TrueHD audio track, causing a less-than-stellar audio experience for customers who weren't savvy enough to adjust their player and amplifier to compensate.<br /><br />The good news is that Paramount confirmed on September 25th that they had recalled all of the defective copies and replaced them with newly-authored discs that fix this issue. [...]<br /><br />This recall occurred prior to Iron Man's release, so no one should have wound up with a defective copy except for the reviewers who received their copies in advance. You can purchase with confidence without worrying whether your product is the corrected one, unlike with the Back to the Future DVDs and Pirates of the Carribbean I Blu-ray which still have defective copies unknowingly being sold by some stores despite having been re-authored after the initial batch.\""
## [6] "\"result.6\",\"Please Note: Opinions are like...well you know how the saying goes. If you have one, write a review the voting system is for those who HAVEN'T purchased the item and whether or not the review was helpful in that decision.<br /><br />\"\"Titanium Alloy Man\"\" just doesn't have the same ring to it as \"\"Iron Man\"\". Tony Stark (Robert Downey, Jr. in a terrific, complex and amusing performance)is \"\"The Merchant of Death\"\" building his father's company into a juggarnaut defense company. His latest defense system the Jericho can crush the enemy. When Stark is kidnapped on his way back from a demonstration the injured Stark is forced to build a home made version of Jericho. With bits of metal in his heart kept from killing him due to the ingenuity of another captor, Stark almost literally has a change of heart--particularly when he sees the bad guys have HIS weapons.<br /><br />He uses the crude tools to build a suit of iron that can protect him and attack his captors as needed. Stark finds himself reenergized and with his new miniature arc reactor powering the magnet that keeps him alive, he sets out to undo some of the damage his company has done by becoming Iron Man. Standing in his way is Obadiah Stane (Jeff Bridges superb as usual)who wants the company to run as usual and Stark even gets flak from his stauch supporters Pepper (Gwyneth Paltrow)and Col. Rhodes (Terence Howard).<br /><br />The Blu-ray looks brilliant--it's one of the sharpest transfers I've seen to date with colors that pop and some of the best details/clarity I've seen. Heck, even the DVD is one of the top notch ones I've seen in recent years. As for the issue with TrueHD sound--Paramount has fixed that issue remanufacturing the BD and still meeting their release date.<br /><br />The extras are stunning as well. We get a full documentary \"\"I AM Iron Man\"\" that details all aspects of production giving us a glimpse into everything from pre-CGI work, design elements to on-the-set wire work involving Robert Downey, Jr. Director Jon Favreau (who also plays Happy in the film)manages to seamlessly combine CGI with pratical physical effects such as puppets and the men in suits. His visual effects and physical effects team (from Stan Winston Studios)blend things so well that there were some shots that I could have sworn were physical effects but turned out to be CGI and vice versa. We also get deleted/extended scenes that are interesting but prove that Favreau made the right choice in cutting the bulk of them out. There are also stills galleries, screen test, a featurette \"\"Invincible Iron Man\"\" that gives us an idea about the development of the characterwith interviews featuring many of the Marvel bullpen who contributed to metal head's development, \"\"Wired\"\" which provides us background on the physical effects/visual effects of the film. \"\"hall of Armor\"\" takes us into the development of the \"\"suits\"\".<br /><br />Director Favreau manages to keep the fun comic book elements of the story and still attach a serious but entertaining element to the film resulting in one of the summer's best blockbusters. It may lack the darkness of \"\"The Dark Knight\"\" (ironic considering that \"\"Iron Man\"\" is really Marvel's version of \"\"Batman\"\" except involving more advanced technology)but the alternating tone of the film makes it an enjoyable companion piece to the best of the \"\"Spider-Man\"\" films directed by Sam Raimi.<br /><br />The nice thing about \"\"Iron Man\"\" is that it doesn't betray its roots but celebrates them (although it does transport the action which originally occurred in Vietnam to Afgan terrorities and also moves some characters around such as Stane for a stronger, more cohesnive narrative but still remains true to the spirit of the comic book).<br /><br />Marvel's first in-house production \"\"Iron Man\"\" demonstrates that the comic book company turned movie company can do as good a job (if not better)at during their own material in terrific films that don't betray their origins. Just a reminder--after the credits roll DON'T turn off your TV or BD player. There's a sequence that actually sets up what is said to be the third \"\"Iron Man\"\" film (or second depending upon who you hear it from)and has a companion piece clip at the conclusion of \"\"The Incredible Hulk\"\".<br /><br />Highly recommended!<br /><br />Updated 9/30/08 FYI, if you are having problems playing your disc select \"\"No\"\" if a menu comes up asking if you want to turn on BD Live or change the options in your settings for your PS3. I didn't have this problem however since I elected NOT to watch it on my PS3 but on my stand alone Blu-ray player.\""
Doc.id=seq(1:length(text)) # Assign Document no for each Document
calib=data.frame(Doc.id,text) # Create a dataframe for text documents with document ID
#stpw = readLines(file.choose()) # Select stopwords.txt file
stpw = readLines('stopwords.txt')
stpw1 = stopwords('english') # tm package stop word list
comn = unique(c(stpw, stpw1)) # Union of two list
stopwords = unique(c(gsub("'","",comn),comn)) # final stop word list after removing punctuation
head (stopwords)
## [1] "a" "as" "able" "about" "above" "according"
#############################################################
# Text Cleaning #
#############################################################
test = text.clean(text) # basic HTML Cleaning etc
test = removeWords(test,stopwords) # removing stopwords created above
head(test) # print top documents
## [1] "result disc features deleted extended scenes opening ambush tony stark proactive footage rhodes quickly apparent character scenes cut film tony pepper potts attend party disc starts impressive iron man minute making documentary viewed segments altogether taking aspects production step step construction iron man armor robert downey jr cracking jokes fitted amazing suit practical good person due large part genius late great stan winston company included plenty soundstage footage scenes filmed invincible iron man part documentary comic book tracing history character stan lee modeled stark howard hughes part mentions fully satisfied armor years doc covers key characters storylines excellent detail people worked title years talking contribution mythos overview comic book wired visual effects iron man examines cgi work realizing iron mans powers flying repulsors director jon favreau likes practical effects wonderfully refreshing hear film mixed practical cgi robert downey jr screen test incredibly actor screen test studio deemed risky proposition footage shows handle character early actors process features fascinating footage jeff bridges downey rehearsing scene favreau great guys work offers insight put scene film acting point view onions wildly popular iron man trailer adapted full length film funny satire newscaster breaks story iron man trailer made film pokes fun rabid nature hardcore fanbase character finally galleries featuring concept art technology stills scenes photographs poster art"
## [2] "result great superhero film family enjoy wondering special features disc dvd iron man ultimate edition dvd set presented widescreen enhanced televisions dolby digital english surround french surround spanish surround english french spanish subtitles total runtime minutes bonus features include disc feature filmdeletedextended scenesdisc iron man journey begins suit makes iron man walk destruction grounded reality beneath armor details good story toldthe invincible iron man origins friends foes definitive iron man demon bottle extremis ultimate iron manwired visual effects iron manrobert downey jr screen testthe actors process scene rehearsal cast onion wildly popular iron man trailer adapted full length film image galleries"
## [3] "result big question mark looming theatrical adaptation marvels iron man property guise director jon favreau wrong love favs heard helming big budget comic book flick worried cast set fanboys started humming internet started ease decision high anticipation thankfully finally finished product disappointed great mix professionalism stakes spider man men comic wit sheer fun fantastic iron man shows comic brought screen successfully added drama weight finally film essence makes picture books popular action mythology sense adventure humor favreau bogs overwrought emotions speaks gags poorly written jokes delivers promises solid initiation great trilogy favreau idea origin story boring long drawn back story ability give dual information nicely orchestrated showing tony stark basement creating tv background explains happening world middle east inside company audience allowed put pieces amidst witty banter stark wonderful special effects end film amazing information realize culminating decent final battle importantly segue inevitable sequel allowed entrance character evolution stark war profiteer man action technology improve advance eyes batman hero fighting crime superhuman abilities brain thoughts paper reality feat magic stage shown failure success ride add threat global war destruction real success bold move casting actor superhero takes guts matter studios change story make younger churn babies favreau marvel robert downey jr play stark sarcastic lothario brain capacity einstein suited role proves nailing single scene ad libbing comic delivery ability switch dime sincere seriousness shows masterful craft rest cast jeff bridges plays bombastic creature villainy top appropriately terrence howard nice friend military liaison sowing seeds future gwyneth paltrow good sweet assistant pepper potts times underwritten female prop nice moments comic sort shaun toub yinsen starks savior clark gregg head good favreau giving actor turned director props greggs directorial debut year form chuck palahniuks choke shied putting film thing split stan lee give thankless role multiple scenes adding fuel fire peoples opinions egotism stemming drinking game created tv show dinner references swingers made episode forgive big fan forget action film praise actors effect brilliant scenes iron man flying fighter jets trailer lame context deliver suit amazing mach stage end main highlight computer systems stark utilizes multiple screens instant holographic reproductions ability interact representations stunning create fantasy bad real life iron man perfect film perfect comic book adaptation fun comic actioner light box office final showdown bit whimper comparison back story machine creation crucial element saved destruction contrived bit screen writing utilized thought means moments tad campy witty topnotch cinema big screen wait story progresses couple years"
## [4] "result begin warning sit long credits cameo appearance sean connery showed king richard lionheart end robin hood prince thieves time remember people applauding cameo film point left end showing iron man true believers instantly recognized actor character words mouth ironically cameo stan lee film audience reaction pretty good gag stark shows big party bit business iron man comic book superhero movie spider man strength alfred molinas wonderful performance villain great fight sequences spidey doc ock place vertical horizontal axis iron man solid film lower top higher bottom point number comic books marvel putting exploded universe titles dispaired idiotic cloning spider man reading marvel titles daredevil iron man back frank miller dd tony stark full blown alcoholic daredevil cooler iron man stark advantage regular guy superpowers smart guy invent gadgets make iron man work eat heart ned kelly director jon favreaus pre summer blockbuster added angst stark growing conscience armored alter ego restore balance corner universe war ultimately parts movie opening act stark captured afghanistan today vietnam sixties built metallic grey tin woodsman roids prototype armor act works suit movie violent slapstick gags movies engenders biggest laughs origin character fairly faithful updated happened tales suspense plotted stan lee scripted brother larry leiber drawn don heck cover art jack kirby created characters original steve ditko drew red gold armored version touch transformers stark dons iron man armor give credit specific effects movie attention paid screenwriting teams mark fergus hawk ostby children men art marcum matt holloway humor script strong thread stuff extending film tony stark robert downey jr superb actor skills verbal repartee department honed ally mcbeal glib superhero silver screen glib suspected stark downeys personal life echoes character ark character resonance undeniable talents make perfect role pepper potts gwenyth paltrow romantic figure stark comic book happy hogan director favreau relegated minor role starks bodyguard make room character jim rhodes point potential romance fact paltrow actress toe toe downey quick paced nuanced conversation downeys scenes robotic assistant fire extinguisher rhodes hogan acting talent level downey paltrow terrence howard fans comic book movie acknowledges day road jim red gold suit obadiah stane jeff bridges set godfather tony stark regent stark industries rival munitions magnate bit oedipal conflict proceedings compels big fight end iron monger hoping titanium man half expecting mandarian people movie stuff comic book fans end making repeat trips theater remember original virginia pepper potts ended happy hogan versus ultimates version character matters cast characters perfect mesh people put movie thinking sequel series launching platform iron man replace superman big comic book superheroes movies spider man batman"
## [5] "result reviewers received advanced copies iron man blu ray release reported dynamic range compression drc flag active dobly truehd audio track causing stellar audio experience customers savvy adjust player amplifier compensate good news paramount confirmed september recalled defective copies replaced newly authored discs fix issue recall occurred prior iron mans release wound defective copy reviewers received copies advance purchase confidence worrying product corrected unlike back future dvds pirates carribbean blu ray defective copies unknowingly sold stores authored initial batch"
## [6] "result note opinions write review voting system purchased item review helpful decision titanium alloy man ring iron man tony stark robert downey jr terrific complex amusing performance merchant death building fathers company juggarnaut defense company latest defense system jericho crush enemy stark kidnapped back demonstration injured stark forced build home made version jericho bits metal heart killing due ingenuity captor stark literally change heart sees bad guys weapons crude tools build suit iron protect attack captors needed stark finds reenergized miniature arc reactor powering magnet alive sets undo damage company iron man standing obadiah stane jeff bridges superb usual company run usual stark flak stauch supporters pepper gwyneth paltrow col rhodes terence howard blu ray brilliant sharpest transfers date colors pop detailsclarity heck dvd top notch recent years issue truehd sound paramount fixed issue remanufacturing bd meeting release date extras stunning full documentary iron man details aspects production giving glimpse pre cgi work design elements set wire work involving robert downey jr director jon favreau plays happy film manages seamlessly combine cgi pratical physical effects puppets men suits visual effects physical effects team stan winston studios blend things shots sworn physical effects turned cgi vice versa deletedextended scenes interesting prove favreau made choice cutting bulk stills galleries screen test featurette invincible iron man idea development characterwith interviews featuring marvel bullpen contributed metal heads development wired background physical effectsvisual effects film hall armor takes development suits director favreau manages fun comic book elements story attach entertaining element film resulting summers blockbusters lack darkness dark knight ironic iron man marvels version batman involving advanced technology alternating tone film makes enjoyable companion piece spider man films directed sam raimi nice thing iron man betray roots celebrates transport action originally occurred vietnam afgan terrorities moves characters stane stronger cohesnive narrative remains true spirit comic book marvels house production iron man demonstrates comic book company turned movie company good job material terrific films betray origins reminder credits roll turn tv bd player sequence sets iron man film depending hear companion piece clip conclusion incredible hulk highly recommended updated fyi problems playing disc select menu turn bd live change options settings ps problem elected watch ps stand blu ray player"
clean_text = test
########################################################
# Create Document Term Matrix #
########################################################
x1 = Corpus(VectorSource(test)) # Create the corpus
x1 = n.gram(x1,"tri",5) # Encoding bi-gram with atleast frequency 3 as uni-gram
dtm1 = custom.dtm(x1,"tf") # Document Term Frequency
dtm2 = custom.dtm(x1,"tfidf") # Term Frequency Inverse Document Frequency Scheme
######################################################
# Basic Analysis #
# 1- Using Term frequency(tf)
freq1 = (sort(apply(dtm1,2,sum), decreasing =T)) # Calcualte term frequency
freq1[1:80] # View top 80 terms
## iron-man movie film stark
## 243 201 139 118
## good great result robert-downey-jr
## 103 103 94 76
## time weapons suit character
## 71 71 69 64
## tony-stark action comic-book role
## 64 63 59 57
## story tony movies starks
## 57 47 45 44
## fun make superhero downey
## 42 42 41 40
## blu-ray characters jeff-bridges marvel
## 39 39 39 39
## scenes company man cast
## 37 36 36 35
## gwyneth-paltrow life makes special-effects
## 35 34 34 34
## disc end scene version
## 33 33 33 33
## work back films watch
## 33 32 30 30
## effects lot made part
## 29 29 29 29
## perfect acting armor excellent
## 29 28 28 28
## actor comic pepper-potts actors
## 27 27 27 26
## afghanistan big cool home
## 26 26 24 24
## people rhodes screen terrence-howard
## 24 24 24 24
## bit build comics credits
## 23 23 23 23
## job plot summer amazing
## 23 23 23 22
## plays audio paltrow weapon
## 22 21 21 21
## dark-knight fantastic iron-man-suit ironman
## 20 20 20 20
windows() # New plot window
wordcloud(names(freq1), freq1, scale=c(4,0.5),1, max.words=200,colors=brewer.pal(8, "Dark2")) # Plot results in a word cloud
title(sub = "Term Frequency - Wordcloud")
# 2- UsingTerm Frequency Inverse Document Frequency (tfidf)
freq2 = (sort(apply(dtm2,2,sum), decreasing =T)) # Calcualte term frequency
freq2[1:80] # View top 80 terms
## patient prompt normal dvds plastic
## 4.251468 4.188886 4.115115 4.103995 4.102992
## days inch samsung producers replacement
## 4.079906 4.040692 4.040692 4.004230 3.974013
## makers villian flow topped flawless
## 3.885024 3.884591 3.876680 3.858469 3.828979
## cable network unplug bdlive pleasing
## 3.800034 3.800034 3.800034 3.786700 3.779175
## rounded connected longer notable fascinating
## 3.778937 3.761053 3.737529 3.723637 3.718336
## causing artwork viewing loading authored
## 3.711559 3.707597 3.689413 3.680419 3.649752
## copies amazon perfectly mask international
## 3.649752 3.647358 3.636089 3.619546 3.611752
## corrected load proved surround reviewers
## 3.605278 3.604415 3.586106 3.576967 3.567707
## cohesive description rental downloading rules
## 3.566495 3.563300 3.562846 3.560804 3.560804
## region dialogue shelf fights purchase
## 3.557848 3.539114 3.535860 3.535435 3.526685
## heavy awesome rare menace motivation
## 3.519965 3.517126 3.512948 3.504560 3.500933
## slow worth great-movie copy extra
## 3.494945 3.494945 3.492495 3.491799 3.473809
## slowly shot falling costume average
## 3.459708 3.453601 3.449459 3.445489 3.443206
## owning playstation defective pacing jeff
## 3.431663 3.430441 3.428954 3.424003 3.422654
## explosions collection product picking blue
## 3.418916 3.405739 3.404473 3.402793 3.395964
## casted replaced till hardcore confidence
## 3.388158 3.378319 3.372384 3.371763 3.371608
windows() # New plot window
wordcloud(names(freq2), freq2, scale=c(4,0.5),1, max.words=200,colors=brewer.pal(8, "Dark2")) # Plot results in a word cloud
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : superhero-movie could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : purchase could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : surround could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : acting could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : delivered could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : result-iron-man could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : theaters could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : box could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : longer could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : load could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : united could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : worth could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : connected could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : break could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : feature could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : impressed could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : stellar could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : display could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : heavy could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : owning could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : playstation could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : mask could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : risk could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : spark could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : hours could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : samsung could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : slow could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : awesome could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : loading could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : pacing could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : notable could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : picking could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : dialogue could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : watched could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : succeeds could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : authored could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : edition could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : amazon could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : forward could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : unplug could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : normal could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : shelf could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : execution could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : buy could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : popped could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : son could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : theater could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : outstanding could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : international could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : catch could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : region could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : extra could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : internet could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : complaint could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : patient could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : copies could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : rare could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : love could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : laughs could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : average could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : mark could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : suspension could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : plot could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : pace could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : costume could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : replaced could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : makers could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : replacement could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : surrounding could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : pleasing could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : defective could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : viewing could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : prompt could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : gweneth could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : settings could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : storyline could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : cable could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : visually could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : romance could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : flow could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : require could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : disbelief could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : overly could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : confidence could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : topped could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : holes could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : clear could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : tons could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : couch could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : rules could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : showed could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : shot could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : falling could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : hardcore could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : cohesive could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : rounded could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : insert could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : peter could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : connection could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : menace could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : states could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : players could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : industries could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : download could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : great-movie could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : proved could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : plastic could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : confident could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : dvds could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : ironman could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : genuine could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : heroes could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : case could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : tight could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : fascinating could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : jeff could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : flawless could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : sound could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : invention could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : drc could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : skip could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : found could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : option could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : blue could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : artwork could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : simply could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : alot could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : corrected could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : moved could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : minimal could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : wall could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : casted could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : disc could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : collection could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : care could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : developer could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : product could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : stayed could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : rise could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : comedic could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : slowly could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : chemistry could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : sad could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : orig could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : days could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : handle could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : copy could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : rental could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : joy could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : causing could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : definitive could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : larger could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : length could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : sony could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : network could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : lost could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : explosions could not be fit on page. It will not be plotted.
## Warning in wordcloud(names(freq2), freq2, scale = c(4, 0.5), 1, max.words =
## 200, : downloading could not be fit on page. It will not be plotted.
title(sub = "Term Frequency Inverse Document Frequency - Wordcloud")
###########################################################
# Sentiment Analysis #
###########################################################
clean_text0 = clean_text[clean_text != ""] # Remove Blank Document for sentiment Analysis
pol = polarity(clean_text0) # Calculate the polarity from qdap dictionary
wc = pol$all[,2] # Word Count in each doc
val = pol$all[,3] # average polarity score
p = pol$all[,4] # Positive words info
n = pol$all[,5] # Negative Words info
positive_words = unique(setdiff(unlist(p),"-")) # Positive words list
negative_words = unique(setdiff(unlist(n),"-")) # Negative words list
print(positive_words) # Print results
## [1] "proactive" "impressive" "amazing" "good"
## [5] "genius" "great" "invincible" "satisfied"
## [9] "excellent" "worked" "contribution" "work"
## [13] "likes" "wonderfully" "refreshing" "incredibly"
## [17] "fascinating" "popular" "fun" "enjoy"
## [21] "enhanced" "bonus" "marvels" "love"
## [25] "ease" "fantastic" "successfully" "humor"
## [29] "promises" "solid" "nicely" "witty"
## [33] "wonderful" "decent" "improve" "hero"
## [37] "feat" "magic" "success" "marvel"
## [41] "proves" "sincere" "masterful" "top"
## [45] "nice" "sweet" "savior" "praise"
## [49] "brilliant" "stunning" "perfect" "topnotch"
## [53] "instantly" "pretty" "advantage" "smart"
## [57] "blockbuster" "works" "fairly" "faithful"
## [61] "gold" "strong" "superb" "talents"
## [65] "romantic" "happy" "talent" "fans"
## [69] "advanced" "dynamic" "stellar" "savvy"
## [73] "paramount" "confidence" "helpful" "terrific"
## [77] "amusing" "ingenuity" "protect" "sharpest"
## [81] "top notch" "interesting" "entertaining" "enjoyable"
## [85] "stronger" "incredible" "recommended" "faith"
## [89] "brilliantly" "wins" "classic" "promise"
## [93] "cool" "helped" "fond" "supporting"
## [97] "lead" "coherent" "super" "intelligent"
## [101] "capable" "clear" "cute" "outstanding"
## [105] "wisely" "convincing" "satisfying" "captivating"
## [109] "effectively" "fine" "important" "honest"
## [113] "favorite" "fortunately" "loved" "trump"
## [117] "celebrate" "graciously" "humorous" "fast"
## [121] "loyal" "remarkably" "recommendation" "favor"
## [125] "passion" "boom" "successful" "improved"
## [129] "enjoyed" "coolest" "wow" "fabulously"
## [133] "wealthy" "sharp" "pleased" "suffice"
## [137] "loving" "support" "hail" "glory"
## [141] "perfectly" "tremendously" "wise" "realistic"
## [145] "cleverly" "winning" "powerful" "improving"
## [149] "leads" "prodigy" "convincingly" "clever"
## [153] "pure" "thrilled" "reverence" "integrated"
## [157] "confident" "winner" "correct" "believable"
## [161] "maturity" "awards" "relief" "greatest"
## [165] "free" "reputation" "peace" "brilliance"
## [169] "ready" "smooth" "gained" "hilarious"
## [173] "comfort" "luxurious" "convenient" "rich"
## [177] "redeem" "charming" "creative" "fancy"
## [181] "modern" "helping" "positive" "formidable"
## [185] "intelligence" "pleases" "memorable" "benefit"
## [189] "fastest" "award" "richer" "appealing"
## [193] "wonderous" "excitement" "phenomenal" "genuine"
## [197] "famous" "lovely" "rational" "renewed"
## [201] "improves" "pleasing" "succeeds" "fresh"
## [205] "worthwhile" "remarkable" "fortitude" "successes"
## [209] "win" "variety" "worthy" "thrilling"
## [213] "patient" "prompt" "lean" "awesomeness"
## [217] "abundant" "intricate" "grace" "gains"
## [221] "bright" "swift" "guidance" "glee"
## [225] "exciting" "charm" "charisma" "dominate"
## [229] "grateful" "easy" "fabulous" "evocative"
## [233] "sexy" "nifty" "pleasant" "superior"
## [237] "glad" "excellence" "avid" "beautiful"
## [241] "safe" "clean" "modest" "mighty"
## [245] "satisfy" "joy" "recommend" "ambitious"
## [249] "efficient" "destiny" "stupendous" "triumphant"
## [253] "excels" "elevate" "spectacular" "glowing"
## [257] "fair" "gloriously" "cohesive" "heartwarming"
## [261] "revolutionized" "patriot" "seamless" "breathtaking"
## [265] "magical" "awesome" "meaningful" "imaginative"
## [269] "hot" "compassionate" "protection" "fave"
## [273] "effective" "shine" "authentic" "charismatic"
## [277] "premier" "flawless" "adventurous" "spellbinding"
## [281] "pleasure" "stylized" "heros" "miraculous"
## [285] "agility" "grin" "relish" "effortlessly"
## [289] "crisp" "impressed" "exceeded" "beloved"
## [293] "boost" "hopeful" "sweetheart" "luxury"
## [297] "trustworthy" "heroic" "awe" "positively"
## [301] "worth" "proving" "warm" "improvements"
## [305] "light hearted" "beauty" "stable" "fast paced"
## [309] "tough" "suitable" "succeed" "astounding"
## [313] "excited" "continuity" "passionately" "strongest"
## [317] "lawful" "engaging" "endearing" "polished"
## [321] "gentle" "gifted" "quiet" "enjoying"
## [325] "safely" "recomend" "solace" "entertains"
## [329] "exceedingly" "jovial" "golden" "noble"
## [333] "faster" "kudos" "lighter" "lovable"
## [337] "empathize" "catchy" "trust" "sophisticated"
## [341] "mature" "encourage" "delightful" "suave"
## [345] "obsession" "enthusiastic" "appreciated" "promptly"
## [349] "integral" "eager"
print(negative_words) # Print results
## [1] "ambush" "stark" "risky"
## [4] "wildly" "funny" "breaks"
## [7] "rabid" "destruction" "demon"
## [10] "wrong" "worried" "humming"
## [13] "disappointed" "poorly" "boring"
## [16] "inevitable" "crime" "failure"
## [19] "threat" "sarcastic" "seriousness"
## [22] "bombastic" "choke" "split"
## [25] "thankless" "egotism" "lame"
## [28] "bad" "showdown" "whimper"
## [31] "contrived" "warning" "ironically"
## [34] "idiotic" "full blown" "violent"
## [37] "heck" "glib" "rival"
## [40] "conflict" "defective" "issue"
## [43] "wound" "worrying" "complex"
## [46] "death" "crush" "enemy"
## [49] "killing" "crude" "attack"
## [52] "damage" "flak" "puppets"
## [55] "vice" "lack" "darkness"
## [58] "dark" "ironic" "betray"
## [61] "problems" "problem" "doubt"
## [64] "hesitant" "jerk" "bash"
## [67] "cave" "junk" "dies"
## [70] "destroy" "ruin" "ruined"
## [73] "fear" "bulky" "fake"
## [76] "complain" "disbelief" "spoiled"
## [79] "conceited" "impossible" "betrayal"
## [82] "clumsy" "darker" "detract"
## [85] "distortion" "painfully" "error"
## [88] "long time" "stupid" "absurd"
## [91] "absurdly" "odd" "suck"
## [94] "miss" "incompetence" "deny"
## [97] "rough" "frenetic" "flaws"
## [100] "hard" "lost" "arrogant"
## [103] "womanizing" "flawed" "enemies"
## [106] "ugliness" "regret" "sass"
## [109] "lie" "prisoner" "stormy"
## [112] "denying" "havoc" "unable"
## [115] "steal" "plot" "messes"
## [118] "killed" "horrified" "damages"
## [121] "messing" "mystery" "dragged"
## [124] "torture" "issues" "rollercoaster"
## [127] "worry" "pathetic" "downhill"
## [130] "terror" "break" "villianous"
## [133] "weak" "guilt" "traumatized"
## [136] "chagrin" "dangerous" "risks"
## [139] "evil" "conspiracy" "foe"
## [142] "devil" "irony" "setbacks"
## [145] "sinister" "pompous" "fleeting"
## [148] "poor" "lose" "crazy"
## [151] "hype" "touchy" "missed"
## [154] "joker" "harm" "infamous"
## [157] "murderer" "adversary" "injustice"
## [160] "shake" "threatening" "stubborn"
## [163] "cocky" "extremists" "difficult"
## [166] "refuses" "refusing" "strictly"
## [169] "anxious" "unwillingness" "kill"
## [172] "monster" "smug" "explosive"
## [175] "tanks" "unhappy" "loss"
## [178] "bomb" "unfinished" "trouble"
## [181] "desperately" "decadent" "wasted"
## [184] "steals" "lethal" "twisted"
## [187] "crooked" "hostage" "hated"
## [190] "meaningless" "bother" "drawback"
## [193] "danger" "sneering" "implausible"
## [196] "extravagant" "hang" "mistakes"
## [199] "breaking" "heavy handed" "bitterness"
## [202] "ignore" "nemesis" "misses"
## [205] "deadly" "falls" "concern"
## [208] "demise" "flair" "dread"
## [211] "object" "limited" "drag"
## [214] "problematic" "disable" "incorrect"
## [217] "confrontation" "treason" "cheesy"
## [220] "fallen" "unbelievably" "doubts"
## [223] "egotistical" "critic" "concerned"
## [226] "cold" "fiction" "deceit"
## [229] "broke" "sad" "waste"
## [232] "sufferer" "critics" "blow"
## [235] "hurts" "villains" "complaint"
## [238] "scarce" "hypocritical" "disagree"
## [241] "pretend" "damn" "fault"
## [244] "twists" "skeptic" "gritty"
## [247] "irritated" "limitations" "stuck"
## [250] "silly" "incomplete" "bust"
## [253] "inflict" "rumors" "ominous"
## [256] "falling" "devastation" "crisis"
## [259] "terrorism" "acerbic" "unbelievable"
## [262] "disappoint" "brutally" "fall"
## [265] "tanked" "drunken" "stupor"
## [268] "critical" "gripe" "negative"
## [271] "vengeance" "kills" "shaky"
## [274] "overlook" "destructive" "strange"
## [277] "abuse" "pain" "fiend"
## [280] "laughable" "lacking" "ineffective"
## [283] "warned" "sucks" "sarcasm"
## [286] "irrepressible" "corruption" "mad"
## [289] "feverish" "excuse" "insane"
## [292] "prison" "scary" "intimidating"
## [295] "overwhelming" "hedonistic" "myth"
## [298] "provocative" "carnage" "inevitably"
## [301] "traumatic" "detrimental" "unpredictable"
## [304] "villainous" "excessive" "distressed"
## [307] "eccentric" "suffer" "intense"
## [310] "careless" "faltered" "whining"
## [313] "slowly" "struck" "stealing"
## [316] "risk" "struggles" "slow"
## [319] "unfamiliar" "shallow" "reluctantly"
## [322] "dump" "bore" "concerns"
## [325] "fury" "dismay" "die hard"
## [328] "skeptical" "suicidal" "inaccuracies"
## [331] "dying" "profanity" "twist"
## [334] "obsessive" "awful" "spite"
## [337] "disappointments" "disappointment" "worse"
## [340] "anti" "scoundrel" "hater"
## [343] "declines" "discomfort" "irredeemably"
## [346] "oddly" "uninformed" "mundane"
## [349] "menace" "insanity" "simplistic"
## [352] "jealousy" "crash" "vanity"
## [355] "ruthless" "nasty" "jam"
## [358] "clunky" "unknown" "afraid"
## [361] "hurt" "rip" "brute"
## [364] "displaced" "heartless" "villian"
## [367] "frustrated" "futility" "buzzing"
## [370] "lies" "nonsense" "contend"
## [373] "desert" "headache" "wild"
## [376] "pan" "pig" "vengeful"
## [379] "suspiciously" "sick" "tricky"
## [382] "aloof" "stolen"
########################################################
# Create Postive Words wordcloud #
########################################################
tdm_temp = t(TermDocumentMatrix(Corpus(VectorSource(clean_text0))))
pos.tdm = tdm_temp[,setdiff(match(positive_words,colnames(tdm_temp)),NA)]
m = as.matrix(pos.tdm)
v = sort(colSums(m), decreasing = TRUE)
windows()
wordcloud(names(v), v, scale=c(4,0.5),1, max.words=100,colors=brewer.pal(8, "Dark2"))
title(sub = "Positive Words - Wordcloud")
########################################################
# Create Negative Words wordcloud #
########################################################
neg.tdm = tdm_temp[,setdiff(match(negative_words,colnames(tdm_temp)),NA)]
m = as.matrix(neg.tdm)
v = sort(colSums(m), decreasing = TRUE)
windows()
wordcloud(names(v), v, scale=c(4,0.5),1, max.words=100,colors=brewer.pal(8, "Dark2"))
title(sub = "Negative Words - Wordcloud")
#######################################################
# Positive words vs Negative Words plot #
#######################################################
len = function(x){
if ( x == "-" && length(x) == 1) {return (0)}
else {return(length(unlist(x)))}
}
pcount = unlist(lapply(p, len))
ncount = unlist(lapply(n, len))
doc_id = seq(1:length(wc))
windows()
plot(doc_id,pcount,type="l",col="green",xlab = "Document ID", ylab= "Word Count")
lines(doc_id,ncount,type= "l", col="red")
title(main = "Positive words vs Negative Words" )
legend("topright", inset=.05, c("Positive Words","Negative Words"), fill=c("green","red"), horiz=TRUE)
#################################################
## --- model based text analytics ------ ###
#################################################
K = 6
## Bayes Factor model selection (should choose K or nearby)
summary(simselect <- topics(dtm1, K=K+c(-4:4)), nwrd=0)
##
## Estimating on a 100 document collection.
## Fit and Bayes Factor Estimation for K = 2 ... 10
## log posterior increase: 27.5, done.
## log BF( 2 ) = 5937.35
## log posterior increase: 888, done.
## log BF( 3 ) = 1457.3
## log posterior increase: 500.1, done.
## log BF( 4 ) = -3190.04
##
## Log Bayes factor and estimated dispersion, by number of topics:
##
## 2 3 4
## logBF 5937.35 1457.30 -3190.04
## Disp 1.32 1.22 1.19
##
## Selected the K = 2 topic model
K = simselect$K; # Change simselect$K to any the number of topics you want to fit in model
# -- run topic model for selected K -- #
summary( simfit <- topics(dtm1, K=K, verb=2), nwrd = 12 )
##
## Estimating on a 100 document collection.
## Fitting the 2 topic model.
## log posterior increase: 27.5, done. (L = -71898.5)
##
## Top 12 phrases by topic-over-null term lift (and usage %):
##
## [1] 'multiple', 'gags', 'putting', 'glib', 'jokes', 'doc', 'fascinating', 'party', 'practical', 'stage', 'gregg', 'banter' (55)
## [2] 'authored', 'corrected', 'causing', 'drc', 'reported', 'occurred', 'copies', 'reviewers', 'purchase', 'unknowingly', 'defective', 'dynamic' (45)
##
## Dispersion = 1.32
rownames1 = gsub(" ", ".", rownames(simfit$theta)); rownames(simfit$theta) = rownames1;
#######################################################
### compute lift for all terms across all topics ###
theta = simfit$theta
lift = theta*0; sum1 = sum(dtm1)
for (i in 1:nrow(theta)){
for (j in 1:ncol(theta)){
ptermtopic = 0; pterm = 0;
ptermtopic = theta[i, j]
pterm = sum(dtm1[,i])/sum1
lift[i, j] = ptermtopic/pterm
}}
######################################
# Plot Wordcloud for each topic
for (my_i in 1:ncol(lift)) {
freq = as.matrix((theta)[(match(rownames((lift)[((lift)[,my_i] > 1),]),rownames((theta)))),][,my_i])
freq = as.matrix(freq[(order(freq[,1], decreasing=T)),])
{if (nrow(freq) >= 100) {n = 100}
else {n = nrow(freq)}
}
top_word = as.matrix(freq[1:n,])
#plot.new()
windows()
wordcloud(rownames(top_word), top_word, scale=c(4,0.5), 1, , random.order=FALSE, random.color=FALSE, colors=brewer.pal(8, "Dark2"));
mtext(paste("Latent Topic",my_i), side = 3, line = 2, cex=2)
}
##########################################
# Calculate Document proportion in topics
eta = function(mat, dtm) {
mat1 = mat/mean(mat); terms1 = rownames(mat1);
eta.mat = matrix(0, 1, ncol(mat1))
for (i in 1:nrow(dtm)){
a11 = as.data.frame(matrix(dtm[i,])); rownames(a11) = colnames(dtm)
a12 = as.matrix(a11[(a11>0),]); rownames(a12) = rownames(a11)[(a11>0)]; rownames(a12)[1:4]
a13 = intersect(terms1, rownames(a12)); a13[1:15]; length(a13)
a14a = match(a13, terms1); # positions of matching terms in mat1 matrix
a14b = match(a13, rownames(a12))
a15 = mat1[a14a,]*matrix(rep(a12[a14b,], ncol(mat1)), ncol = ncol(mat1))
eta.mat = rbind(eta.mat, apply(a15, 2, mean))
rm(a11, a12, a13, a14a, a14b, a15)
}
eta.mat = eta.mat[2:nrow(eta.mat), ] # remove top zeroes row
row.names(eta.mat)=row.names(dtm)
return(eta.mat)
}
twc = eta(lift,dtm1)
##############################################
# Find Document by each topic
eta.file = function(mat,calib,n) {
s = list()
for (i in 1: ncol(mat))
{read_doc = mat[order(mat[,i], decreasing= T),]
read_names = row.names(read_doc[1:n,])
s[[i]] = calib[(match(read_names, calib$Doc.id)),2]
}
return(s)
}
temp=eta.file(twc,calib,5)
for (j in 1:length(temp)){
cat("\n")
cat("################################# \n")
cat("Top ", 5, "documents for topic ",j,"\n")
cat("################################# \n")
cat("\n")
#print(paste("Top 10 documents heavily loading on topic",j) )
print(temp[[j]])
}
##
## #################################
## Top 5 documents for topic 1
## #################################
##
## [1] "result.4","Once again I begin with a warning that you need to sit through the really, really long credits for what might be the best cameo appearance since Sean Connery showed up as King Richard the Lionheart at the end of ""<a href=""http://www.amazon.com/gp/product/B000092T6M/ref=cm_cr_asin_lnk"">Robin Hood - Prince of Thieves</a>."" That was the last time I remember people really applauding a cameo in a film, although I should point out that everybody left at the end of the first showing of ""Iron Man"" were True Believers who instantly recognized the actor and the character as soon as the first words were out of their mouth. Ironically, the cameo by Stan Lee in the film seemed to go right by the audience, because there was no reaction to what was a pretty good gag (it happens when Stark shows up at the big party).<br /><br />Now that I have that bit of business out of the way, let me say that ""Iron Man"" is the best comic book superhero movie I have seen since ""<a href=""http://www.amazon.com/gp/product/B00005JMQW/ref=cm_cr_asin_lnk"">Spider-Man 2</a>."" I would say that the latter is better, mainly on the strength of Alfred Molina's wonderful performance as the villain and the great fight sequences between Spidey and Doc Ock that take place on the vertical as well as the horizontal axis, but ""Iron Man"" might be the more solid film (i.e., lower top but higher bottom). There was a point when the number of comic books that Marvel was putting out exploded (e.g., the New Universe titles) and I dispaired over all of the idiotic cloning with Spider-Man and was down to reading only two Marvel titles: <a href=""http://www.amazon.com/gp/product/0785107576/ref=cm_cr_asin_lnk"">Daredevil</a> and <a href=""http://www.amazon.com/gp/product/078512764X/ref=cm_cr_asin_lnk"">Iron Man</a>. This was back when Frank Miller was doing DD and Tony Stark was a full-blown alcoholic. Daredevil might have been cooler, but as Iron Man, Stark always had the advantage that he was a regular guy, by which I mean that he did not have any superpowers. He was just a really smart guy who could invent the gadgets that would make Iron Man work (eat your heart out <a href=""http://www.amazon.com/gp/product/B000294TC4/ref=cm_cr_asin_lnk"">Ned Kelly</a>). That is certainly what we get with director Jon Favreau's pre-summer blockbuster, with the added angst of Stark growing a conscience and using his armored alter-ego to help restore balance to his own little corner of the universe at war.<br /><br />Ultimately the best parts of the movie are the opening act, in which Stark is captured (Afghanistan today instead of Vietnam of the Sixties)and has to built the metallic grey Tin Woodsman on roids prototype armor, and the second act, where he works out the new suit. This movie has two or three of the best violent slapstick gags you have ever seen in one of these movies, which engenders some of the biggest laughs. The origin of the character is fairly faithful, for being updated, to what happened in ""Tales of Suspense"" #39, which was plotted by Stan Lee, scripted by his brother Larry Leiber, drawn by Don Heck, with a cover art by Jack Kirby (who created the character's original look, although it was Steve Ditko who first drew the red and gold armored version). There certainly is more than a touch of ""<a href=""http://www.amazon.com/gp/product/B000VR0570/ref=cm_cr_asin_lnk"">Transformers</a>"" to the way Stark dons the Iron Man armor, but as much as I would give credit to the specific effects in this movie, attention must be paid to the screenwriting teams of Mark Fergus & Hawk Ostby (""<a href=""http://www.amazon.com/gp/product/B000N6TX1I/ref=cm_cr_asin_lnk"">Children of Men</a>"") and Art Marcum & Matt Holloway. For all of the humor in the script, there is a strong thread of serious stuff extending throughout this film.<br /><br />As Tony Stark, Robert Downey, Jr., a superb actor whose skills in the verbal repartee department were honed on ""<a href=""http://www.amazon.com/gp/product/B000V8952K/ref=cm_cr_asin_lnk"">Ally McBeal</a>,"" may well be the most glib superhero we have seen on the silver screen. Certainly he is more glib than we would every have suspected Stark to be, but of course Downey's personal life clearly echoes the character ark of his character (it is that resonance as well as his undeniable talents that make him perfect for the role). As Pepper Potts, Gwenyth Paltrow is more of a romantic figure for Stark than she was in the <a href=""http://www.amazon.com/gp/product/0785118608/ref=cm_cr_asin_lnk"">comic book</a>, especially since Happy Hogan (director Favreau) has been relegated to a minor role as Stark's bodyguard to make room for the character of Jim Rhodes. However, the point is not so much potential romance as it is the fact that with Paltrow we have an actress who can go toe to toe with Downey in quick paced nuanced conversation (although many will think that Downey's best scenes are with his robotic assistant with the fire extinguisher). Besides, by have Rhodes instead of Hogan we not only get another acting talent on the level of the Downey and Paltrow with Terrence Howard, but as fans of the comic book know (and the movie acknowledges), one day down the road Jim is going to get to be in the red and gold suit.<br /><br />Obadiah Stane (Jeff Bridges) is set up as a godfather to Tony Stark and a regent to Stark Industries instead of being a rival munitions magnate, which provides a bit of Oedipal conflict to the proceedings and compels the big fight at the end to be with Iron Monger (I was actually hoping for Titanium Man even though I was half expecting the Mandarian). But most people who come to see this movie are not going to know any of this stuff, and even most of the comic book fans who will end up making repeat trips to the theater to see this one are not going to be old enough to remember the original Virginia ""Pepper"" Potts who ended up with Happy Hogan versus the ""<a href=""http://www.amazon.com/gp/product/0785121382/ref=cm_cr_asin_lnk"">The Ultimates</a>"" version of the character. All that really matters is that the cast and characters are a perfect mesh and the people who put this movie together should be thinking not just about a sequel but about a series. With this launching platform, Iron Man could well replace Superman in the Big Three of comic book superheroes in the movies along with Spider-Man and Batman."
## [2] "result.1","The first disc features 11 deleted and extended scenes. There's more of the opening ambush with Tony Stark being more proactive. We also see more footage of Rhodes and it quickly becomes apparent that he was the character with the most scenes cut from the film. We also see Tony and Pepper Potts attend another party.<br /><br />The second disc starts off with the impressive ""I Am Iron Man,"" a 108 minute making of documentary that can be viewed in seven segments or altogether, taking us through various aspects of the production. For example, we are taken step-by-step through the construction of the Iron Man armor with Robert Downey Jr. cracking jokes while being fitted for it. It's amazing how much of the suit is practical and looks really good in person. This is due in large part to the genius of the late-great Stan Winston and his company. Also included is plenty of soundstage footage of scenes being filmed.<br /><br />""The Invincible Iron Man"" is a six-part documentary on the comic book, tracing the history of the character. Stan Lee says that he modeled Stark after Howard Hughes, for the most part. He also mentions that he was never fully satisfied with the look of the armor - hence its many changes over the years. This doc also covers various key characters and storylines in excellent detail with several people who worked on the title over the years talking about their contribution to the mythos. This is a very well done overview of the comic book.<br /><br />""Wired: The Visual Effects of Iron Man"" examines the CGI work that went into realizing Iron Man's powers, like flying, his repulsors, and so on. Director Jon Favreau says that he likes to use practical effects whenever possible, which is wonderfully refreshing to hear, and in this film he mixed the practical with CGI.<br /><br />""Robert Downey Jr. Screen Test."" Incredibly, the actor had to do a screen test because the studio deemed him a risky proposition and this footage shows that he had a handle on the character very early on.<br /><br />""The Actor's Process"" features fascinating footage of Jeff Bridges and Downey rehearsing a scene with Favreau. It's great to see these guys at work and offers insight into how they put together a scene from the film from an acting point-of-view.<br /><br />""The Onion's Wildly Popular Iron Man Trailer to be Adapted into Full-Length Film"" is a funny satire where a newscaster ""breaks"" a story of how the Iron Man trailer will be made into a film that pokes fun at the rabid nature of the hardcore fanbase of the character.<br /><br />Finally, there are ""Galleries,"" featuring concept art, technology stills, behind-the-scenes photographs, and poster art."
## [3] "result.3","There was a big question mark looming over the theatrical adaptation of Marvel's Iron Man property. It was in the guise of director Jon Favreau. Now, don't get me wrong, I love the Favs, but when I heard he was helming a big budget comic book flick...let's just say I was a little worried. Once his cast was set and the fanboys started humming across the internet I started to ease into the decision with high anticipation. Thankfully, after finally seeing the finished product, I was not disappointed in the least. With a great mix of the professionalism and stakes seen in both Spider-Man and X-Men and the comic wit and sheer fun of Fantastic Four, Iron Man shows how a comic can be brought to the screen successfully without all the added drama and weight. We finally have a film with the essence of what makes these picture books so popular, the action and mythology along with a sense of adventure and humor. Favreau never bogs us down with overwrought emotions nor speaks down to us with gags and poorly written jokes. Instead he delivers on his promises and gives us a solid initiation into what could be a great trilogy or more.<br /><br />Favreau seems to have had an idea to get an origin story out while not boring us with long drawn out back story. His ability to give us dual information at once is nicely orchestrated, showing Tony Stark in his basement creating while the TV in the background explains what is happening in the outside world of the Middle East and inside his own company. We as an audience are allowed to put the pieces together amidst the witty banter of Stark and the wonderful special effects. By the end of the film it is quite amazing how much information you will realize you now know, all culminating in a decent final battle, but more importantly a segue into the inevitable sequel. We are allowed entrance into the character evolution of Stark as he goes from war profiteer to man of action and cause, all while seeing the technology improve and advance before our eyes. Much like Batman, we have a hero here that needs help in fighting crime. He has no superhuman abilities besides his brain and being able to see his thoughts go from paper to reality is a feat of magic. Every stage is shown, every failure and success. It's quite the ride in and of itself, but when you add onto it the threat of global war and destruction, it can only get better.<br /><br />The real success here is in the bold move of casting an actor over-40 to be a superhero. This takes guts, because no matter how appropriate it is, most studios would have said, ""no, change the story and make him younger so we can churn out as many of these babies as we can."" I don't know how he did it, but Favreau got Marvel to get Robert Downey Jr. to play Stark, a sarcastic Lothario with the brain capacity of Einstein. I truly can't think of anyone better suited to the role and he proves it by nailing every single scene. I'm sure there was some ad-libbing, but even if not, his comic delivery and ability to switch on a dime to a sincere seriousness at will shows his masterful craft.<br /><br />As for the rest of the cast, they all do well. Jeff Bridges plays the bombastic creature of villainy over-the-top, but appropriately so; Terrence Howard is nice as the friend and military liaison, not given much to do, but definitely sowing seeds for the future; and Gwyneth Paltrow is good as the sweet assistant Pepper Potts who at times seems a little underwritten and more female prop than anything else, but comes through with some nice moments in a very comic sort of way. I also really liked Shaun Toub as Yinsen, Stark's savior, and Clark Gregg as the head of S.H.I.E.L.D. Good to see Favreau giving another actor turned director props, (Gregg's directorial debut comes out later this year in the form of Chuck Palahniuk's Choke). I just wish he would have shied away from putting himself in the film. It's one thing to be seen split-second, (like Stan Lee), but its another to give yourself a thankless role with multiple scenes, just adding fuel to the fire on people's opinions of egotism stemming from the drinking game created off of the TV show ""Dinner for Five"" and how many references to Swingers was made each episode. I'll forgive, though, because, once again, I'm a big fan.<br /><br />One can't forget that this is an action film above all else, so we can't just praise the actors; every effect is also quite brilliant. Those scenes of Iron Man flying amongst fighter jets in the trailer seemed really lame, but when in context they deliver. The suit itself is amazing as well, through every mach stage right to the end. My main highlight, however, was with the computer systems that Stark utilizes. The multiple screens, instant holographic reproductions, and ability to actually interact with those 3D representations is stunning. We can create them in fantasy, but it's just too bad we can't yet in real life.<br /><br />Now Iron Man is not a perfect film, nor even a perfect comic book adaptation. What it is, though, is a fun, comic actioner that should light up the box office. The final showdown is a bit of a whimper in comparison to the back story and machine creation; a crucial element is saved from destruction in the one contrived bit of screen writing, (not quite utilized in the way I thought, although still for the same means); and some moments seem a tad campy rather than witty, but otherwise this is some topnotch cinema that should definitely be seen on the big screen. I can't wait to see how the story progresses in a couple years."
## [4] "result.10","From what i have seen Iron Man is a ok movie. It has a decent plot but the acting could have been better. It was a big buget movie but like I said the acting could have been better. Dont get me wrong it was a good movie all around movie. but i give it a four out of five stars.<br /><br />Iron man started out really slow. This was supposed to be a action movie but, the action didnt start until the middle of the movie. when the action came in it was when he ws braking out of the cave in the desert.<br /><br />alot of people thought that it was goign to be just another crapy marvel movie like fantastic four it was actually really good."
## [5] "result.2","I'll be the first to admit here that I'm really not a comics buff.<br /><br />I buy comics occasionally and sometimes, I like them. But the comics I buy are far more likely to be, say, the newest trade paperback of Knights of the Old Republic than a Spider-Man comic. In fact, I've never bought a typical superhero comic book, though I've read a few. In part that's because I'm obsessive over continuity and I couldn't force myself to read every Spider-Man, X-Men, or Batman comic in existence. So when I read superhero comics I tend to lean towards new continuities, such as Ultimate Marvel.<br /><br />So I like superhero movies. When they're good. I thought the first Hulk film was embarassingly awful, in spite of having an excellent director and cast. I was passionately disappointed with both the third Spider-Man and X-Men films and I, to this day, still don't understand what's so good about the new Superman movie (but then again I always thought that character was silly). So given all the disappointments I wasn't sure what to expect of the new Iron Man film. On the one hand, the previews looked good, the ratings from critics were astounding (the best rated film this year!), and people had told me it was good. So I had high expectations. But a tiny, little voice inside of me kept telling me that I was setting up for a disappointment, to remember last few year's superhero movies, and that the hype never is lived up to.<br /><br />Fortunately, that little voice was wrong - this time.<br /><br />Surprisingly, given the fact that the script wasn't finished at the time of filming, the story is one of Iron Man's strongest points.<br /><br />The story of Tony Stark's transformation from billionaire to superhero is handled alot better than many origin stories, which often come off as what they are - preludes, prologues, promises for a bigger story. It was the problem with the first Spider-Man film and it was even worse for the first X-Men. But Iron Man, like Batman Begins delivers a story that both promises more (particularly in the last scenes of both) but at the same time delivers a fun and complete story in of itself. Maybe it has something to do with superheroes that don't have superpowers. Or maybe it's because the folks at both Marvel and DC are beginning to realize they need to reinvent the superhero movie into something more in order to retain audience interest after so many.<br /><br />And like the best of the Marvel films it doesn't rely on knowledge of the old superhero comics on which it is based, drawing from both the old continuity and the new Ultimate Marvel stuff. Which is probably the best way to go through with it, since a lot of fans have nostalgia for the old comics but whereas Ultimate Marvel is more befitting for our current time.<br /><br />Tony Stark, of course, steals the show and not least because of the acting behind him. But he also stands on his own as a wry, egotistical, and intelligent superhero who stands out from just about every other superhero. There's not really, as far as I can tell, another guy like him in either the Marvel or DC universes. There's of course the paladin-esque superheroes like Spider-Man or Superman and there's the anti-heroes like Wolverine or Batman (at his best, so long as he doesn't delve into Miller-machismo). But there's not really another superhero who both plays the Lawful Good card and can act like a scoundrel at the same time. It's a nice juggling act and done well here.<br /><br />The transformation of Stark into... a weapons-hater is a little less convincing. This is derived, from what I understand, was a major shift in Marvel's approach to the Vietnam War back in the 1970s, when their readers made it clear they opposed the war (which Iron Man had previously been supporting). So they made Stark into a pseudo-pacifist, which really doesn't work. Thankfully they figure that out and moved on, turning him once again into a super-soldier, though one with a strong set of moral boundaries. I have a feeling, given how Iron Man acts in the film, that this is sort of where Stark is going in the films as well. A good thing too as the whole concept of a superhero walking around in a combat exoskeleton who believes weapons are by default evil and should be destroyed is hardly believable.<br /><br />That said, he doesn't lose his touch once he makes the transformation.<br /><br />As for the supporting characters one of the more interesting is Obadiah Stane, who I'd thought was an original character but who I later learned is from the comics. Although near the end of the film his character declines into cliches throughout about 80% of the film he's as engaging as Stark himself. He fills that borderline between comfort and discomfort, of a character you can't quite really decide on who he is or what he stands for. He's elusive. And that's how it's meant to be and that's how it should be. On the other hand, James Rhodes is less interesting as a character though he still manages to make himself endearing. More or less he's the military man stuck with a guy (Stark, of course) who he likes but can't help but realize is a total pain in the ass. Similarly, Stark's Girl Friday ""Pepper Potts"" (how I wish I was making that name up) is thoroughly and irredeemably boring. Why is it that superhero girlfriends have always got to be absolutely unmissable?<br /><br />The special effects in Iron Man are pretty good - though they're not the best I've seen, either in film *or* in television (they're roughly Battlestar-like in quality). As good as the effects are though, they're not the star of the film's production values. That's the cast. Indeed, there are a large number of big-name actors in this film - the biggest name being the aforementioned Gwyneth Paltrow though oddly she's the least interesting of the cast. But, Robert Downey Jr. (as the titular Iron Man / Tony Stark) and Jeff Bridges (as Obadiah Stane) are the true stars of this film and fill out their roles wonderfully, bringing wit and life to the characters they play.<br /><br />Downey is likely the best casting choice for a superhero lead since Christian Bale and, as OSC put it, ""we never get a sense that the actor is playing his part with tongue in cheek; instead, Downey is playing a character who lives his life with tongue in cheek."" And Downey does this wonderfully. Likewise, Bridges is excellent.<br /><br />Overall, Iron Man is a brilliant superhero film that, alongside The Dark Knight, has helped to reinvigorate the genre."
## 100 Levels: "result.1","""Iron Man"" is a great movie. It is great simply because it provides escapism fun for the length of the movie. I cannot claim to be a Hollywood movie critic. I am not going to dissect the acting skills of every actor or the quality of the scenes.<br /><br />All I can say is this - when a movie is over, if I feel moved because of the message it delivers or, in the case of Iron Man, I am excited about the action, etc., and can't wait to watch it again, then I consider it a great movie!<br /><br />Iron Man is a great action movie, pure & simple. If you like things that fly, explosions, etc., all delivered with a Sci-Fi, eccentric billionaire twist, then you'll probably love Iron Man.<br /><br />The Blu-Ray version is superb....explosions, fighting, etc., all provide excellent audio quality. The video is very good.<br /><br />In summary, I think it's classic movie fun....sit back and enjoy it for what it is - a fun ride!" ...
##
## #################################
## Top 5 documents for topic 2
## #################################
##
## [1] "result.5","Reviewers who received advanced copies of the Iron Man Blu-ray release reported that the Dynamic Range Compression (DRC) flag was active on the Dobly TrueHD audio track, causing a less-than-stellar audio experience for customers who weren't savvy enough to adjust their player and amplifier to compensate.<br /><br />The good news is that Paramount confirmed on September 25th that they had recalled all of the defective copies and replaced them with newly-authored discs that fix this issue. [...]<br /><br />This recall occurred prior to Iron Man's release, so no one should have wound up with a defective copy except for the reviewers who received their copies in advance. You can purchase with confidence without worrying whether your product is the corrected one, unlike with the Back to the Future DVDs and Pirates of the Carribbean I Blu-ray which still have defective copies unknowingly being sold by some stores despite having been re-authored after the initial batch."
## [2] "result.3","Disc One<br />*********<br /><br />Version: U.S.A / Region A, B, C<br />Disc one information<br />Aspect ratio: 2.40:1<br />MPEG-4 AVC BD-50 / High Profile 4.1<br />Running time: 2:06:01 (h:m:s)<br />Movie size: 33,44 GB<br />Disc size: 47,22 GB<br />Total bit rate: 35.38 Mbps<br />Average video bit rate: 27.13 Mbps<br /><br />Dolby TrueHD Audio English 3493 kbps 5.1 / 48kHz / 24-bit / 3493kbps (AC3 Core: 5.1 / 48kHz / 640kbps)<br />Dolby Digital Audio French 640 kbps 5.1 / 48kHz / 640kbps<br />Dolby Digital Audio Spanish 640 kbps 5.1 / 48kHz / 640kbps<br /><br />Subtitles: English / English SDH / French / French / Portuguese (Brazilian) / Spanish / Spanish<br /><br />Number of chapters: 15<br /><br />#Deleted/Extended Scenes (HD, 24 minutes)<br />#Documentary: The Invincible Iron Man (HD, 49 minutes)<br />#Hail of Armor (HD)<br />#Iron Man IQ - BD-Live<br /><br />Disc Two<br />********<br /><br />#Documentary: I Am Iron Man (HD, 111 minutes)<br />#Featurette: Wired: The Visual Effects of Iron Man (HD, 27 minutes)<br />#Rehearsal Footage (HD, 11 minutes)<br />#Still Gallery (HD, 5 minutes)<br />#Theatrical Trailers (HD)<br /><br />It's been reported that the Blu-ray's Dolby TrueHD track is activating Dynamic Range Control (DRC) in many AVRs. Users are advised to turn OFF Dynamic Range (Night Mode) option in their AVRs / players to experience lossless audio in it's full glory. Users who have configured their players to do the decoding internally need not care about this problem."
## [3] "result.5","Disc One<br />*********<br /><br />Version: U.S.A / Paramount / Region A, B, C<br />Disc one information<br />Aspect ratio: 2.40:1<br />MPEG-4 AVC BD-50 / High Profile 4.1<br />Running time: 2:06:01 (h:m:s)<br />Movie size: 33,44 GB<br />Disc size: 47,22 GB<br />Total bit rate: 35.38 Mbps<br />Average video bit rate: 27.13 Mbps<br /><br />Dolby TrueHD Audio English 3493 kbps 5.1 / 48kHz / 24-bit / 3493kbps (AC3 Core: 5.1 / 48kHz / 640kbps)<br />Dolby Digital Audio French 640 kbps 5.1 / 48kHz / 640kbps<br />Dolby Digital Audio Spanish 640 kbps 5.1 / 48kHz / 640kbps<br /><br />Subtitles: English / English SDH / French / French / Portuguese (Brazilian) / Spanish / Spanish<br /><br />Number of chapters: 15<br /><br />#Deleted/Extended Scenes (HD, 24 minutes)<br />#Documentary: The Invincible Iron Man (HD, 49 minutes)<br />#Hail of Armor (HD)<br />#Iron Man IQ - BD-Live<br /><br />Disc Two<br />********<br /><br />#Documentary: I Am Iron Man (HD, 111 minutes)<br />#Featurette: Wired: The Visual Effects of Iron Man (HD, 27 minutes)<br />#Rehearsal Footage (HD, 11 minutes)<br />#Still Gallery (HD, 5 minutes)<br />#Theatrical Trailers (HD)<br /><br />It's been reported that the Blu-ray's Dolby TrueHD track is activating Dynamic Range Control (DRC) in many AVRs. Users are advised to turn OFF Dynamic Range (Night Mode) option in their AVRs / players to experience lossless audio in it's full glory. Users who have configured their players to do the decoding internally need not care about this problem."
## [4] "result.2","Ok first off this is a great movie but i wanted to write this for those using ps3 or profile 2.0 BD Live players that are connected to the internet.<br /><br />Iron Man Installs something to your ps3 or BD live player.... It sits at the circular chest piece loading icon for atleast 10 to 15 minutes before it finishes.... Only the first time you load it.... after you wait you will never have to wait again.<br /><br />Ways around this....<br />BDlive player... Unplug the network cable....<br />Ps3..... disable the network under network settings.<br /><br />That being said i discovered this after taking my copy back as disc 2 requires no install time and the movie doesnt prompt to tell you thats what it is doing.<br /><br />Be patient and you will be rewarded with a great movie. Oh and if you have friends over and cant wait.... just turn off the network or unplug that network cable and off you go... hope this helped"
## [5] "result.10","Marvel Comics, unhappy with the lack of creative control and its share of profits in the films made by other studios based on their characters, recently started their own film division. The first film from this endeavor, ""Iron Man"" starring Robert Downey Jr., Gwyneth Paltrow, Jeff Bridges and Terrence Howard, is a lot of fun, and sure to generate a number of sequels based on the huge amount of money made on opening weekend. This is good for Marvel Films because they will need to use some of the profits from this film to offset the inevitable loss for their next film, ""The Incredible Hulk"" starring Edward Norton, Tim Roth and Nick Nolte, due later this summer. Watch the trailer and you'll see what I mean.<br /><br />But I digress. ""Iron Man"".<br /><br />Tony Stark (Downey, Jr.) is a brilliant man who grew up in his father's shadow, an inventor, Starks Sr. & Jr. both learn they can make any of their ideas a reality Sr. was one of the people who helped build the Atomic bomb, so it probably comes as no surprise that Stark Industries sells weapons; weapons of every size, shape and megaton. When Tony comes of age, he takes over the company from his father's right hand man, Obadiah Stane (Jeff Bridges) and the two work together, as a team - Stark handles the inventions, Obadiah handles the business side of things. Stark takes a trip to Afghanistan to demonstrate his newest weapon, a huge missile and bomb combo designed to level mountain ranges. Driving back, his convoy is attacked and he is taken prisoner. During the attack, Tony is injured and a fellow prisoner fits him with a magnet saving his life. When Tony wakes up, he learns his captors want him to recreate the weapon he just demonstrated, for their use. But he comes up with a better idea and creates a new power supply for the magnet, allowing him to move without a car battery at his side. He then uses a list of equipment procured from his captors to create an iron suit, complete with weapons, to wear and escape captivity. When he returns home, he realizes he can improve the suit, its powers and its abilities. Now that Tony has seen his products create death, mayhem and damage, he wants to do some good in the world. Naturally, Obadiah is a little disappointed to learn of the companies new, less profitable business plan. But Colonel Rhodes (Terence Howard) is happy to see the change is his longtime business associate and friend. And Stark's personal assistant, Pepper Pots (Paltrow) is also a little more attracted to her boss. After a test run of his new, sleeker, more powerful suit, Stark realizes he left some unfinished business behind in Afghanistan. Then, some trouble begins to brew back home.<br /><br />Directed by Jon Favreau (""Elf"", ""Zathura"" and an actor with many credits) combines unconventional casting choices, very good acting, an intelligent screenplay and some kick a** special effects to create an enjoyable movie going experience and a great kick off to the summer season. This is one of those occasions when you can almost anticipate the sequel, when you can't wait for it. Now that they have all of the exposition concerning the creation of the superhero out of the way, the sequel can get down to business and throw us directly into the story, keeping us on the edge of our seats. I am an eternal optimist.<br /><br />""Iron Man"" is a lot of fun and more intelligent than you might expect. Robert Downey, Jr. seems like an unconventional choice to play a superhero, and he is, but he is actually the perfect choice for the role of Tony Stark. A rich, highly intelligent industrialist, Tony works hard, spending a lot of time and money coming up with new ideas and inventions, making them work, making his company all the more rich and powerful. But he also plays hard. Living in a fancy, modern house on a hill overlooking the ocean in Malibu, Tony has state of the art everything in his house, allowing him to spend as much time as possible working and playing. He is also a lothario, sleeping with and hitting on as many women as he possibly can. He picks up a reporter in Vegas and the next morning, in his house in Malibu, she is awakened by the house `opening' the curtains to his bedroom, his assistant, Pepper, holding her dry-cleaning. Tony also has an advanced computer system, helping him and allowing him to run with ideas and to continue to develop them. This system allows him to view 3-D holographic depictions of his ideas, removing and adding pieces at will.<br /><br />As we get to know Tony, we realize he lives a secluded life. Allowed to work and play, as he wants, he knows little of the effects of his work on the real world, and leaves the running of his business to Obadiah. When he travels to Afghanistan, his eyes begin to open as he witnesses firsthand what his work actually does, the consequences of his life, and sees a little window through which he can move to start making a positive impact on the world. But this change in his life doesn't please everyone and provides Iron Man with a formidable foe, the Iron Monger.<br /><br />When Stark is taken prisoner in Afghanistan, he uses all of his previous research and designs to build a new and improved power supply to help keep him alive. And he also creates a prototype of Iron Man, allowing his escape from the men who so desperately want him to create a new weapon for them. This is a great illustration of the character's intelligence and cunning, making all of the previous information about him we have been bombarded with seem very real.<br /><br />Downey, Jr. uses his well-known sarcastic attitude and delivery to bring life to Stark's sheltered persona. Because he lives in a cocoon, and has a lot of money, he doesn't realize how the real world works where he lives and plays as he pleases. This same persona also helps the character bring humor to the proceedings and make the story all the more memorable. He proves to be an excellent choice for the role and his career will definitely benefit from the success of this film and it's inevitable sequels.<br /><br />Favreau and his team have created a rich, decadent playground for Stark to live in. His computer system uses advanced holographs and voice commands, he drives the best, fastest cars and his house is run by a computer system that recognizes Tony and Pepper, and addresses them by name. But more importantly, Favreau has assembled a cast that can act, a group of actors more commonly associated with Academy Award nominated and critically praised films. These actors make their characters richer, more interesting, more watchable and more memorable.<br /><br />Gwyneth Paltrow plays Pepper Pots and she is, by far, the weakest of the supporting characters. There is a brief hint of an unrequited love between employee and employer, made more overt during a very good scene set at Walt Disney Concert Hall. But Paltrow is wasted in the role. While she does bring a memorable respectability to the role, making it better, her skills weren't needed for Pepper Pots. When she becomes endangered (which is inevitable, face it), she doesn't stand around shrieking, but she doesn't prove to be extremely strong either. And the flirtatious relationship between Tony and Pepper is generally ignored with the exception of the one scene mentioned earlier and a few passing references. Hopefully, this area will be expanded and improved upon in the next installment.<br /><br />Jeff Bridges plays Obadiah Stane, Stark's father's business partner who helps run the company until Tony becomes old enough to take the reins. Tony continues to work with Obadiah, leaving the day to day operations in his hands, freeing him up to work on his creations. Obadiah is a very smart man and makes the company very profitable. Naturally, he feels threatened by Tony's change in attitude and works behind the scenes to ensure the company will remain as profitable as ever. He also steals Tony's plans and begins work on his own version of Iron Man, seeing the potential in such a lethal weapon. Obadiah has spent his adult life selling weapons, becoming rich as a result. So in his mind, lethal is good.<br /><br />Obadiah is a lot more twisted and crooked than I am letting on, but discovering the extent of this is half the fun.<br /><br />Terrence Howard plays Colonel Jim Rhodes, a longtime associate of Tony, who acts as a liaison between Stark and his government contacts. When Stark is taken hostage, Rhodes leads the rescue mission. When Stark becomes Iron Man, Rhodes helps him out in various ways.<br /><br />As you watch the story unfold, you get the sense Howard, like everyone else in the film, is having a fun time. He plays the role with a certain sense of tongue-in-cheek but this quality is played subtlety, which makes the role all the more appealing and real.<br /><br />""Iron Man"" is a very good, very enjoyable, fun summer film. The actors have a lot of fun and it translates to the screen. The performances, in combination with a well-written screenplay, great special effects and a believable universe help to make ""Iron Man"" one of the more memorable summer films in many years. I can easily see this character becoming a franchise to challenge ""Spiderman"" in popularity."
## 100 Levels: "result.1","""Iron Man"" is a great movie. It is great simply because it provides escapism fun for the length of the movie. I cannot claim to be a Hollywood movie critic. I am not going to dissect the acting skills of every actor or the quality of the scenes.<br /><br />All I can say is this - when a movie is over, if I feel moved because of the message it delivers or, in the case of Iron Man, I am excited about the action, etc., and can't wait to watch it again, then I consider it a great movie!<br /><br />Iron Man is a great action movie, pure & simple. If you like things that fly, explosions, etc., all delivered with a Sci-Fi, eccentric billionaire twist, then you'll probably love Iron Man.<br /><br />The Blu-Ray version is superb....explosions, fighting, etc., all provide excellent audio quality. The video is very good.<br /><br />In summary, I think it's classic movie fun....sit back and enjoy it for what it is - a fun ride!" ...
##################