{"action":"created","issue":{"url":"https://api.github.com/repos/fawda123/ggord/issues/2","labels_url":"https://api.github.com/repos/fawda123/ggord/issues/2/labels{/name}","comments_url":"https://api.github.com/repos/fawda123/ggord/issues/2/comments","events_url":"https://api.github.com/repos/fawda123/ggord/issues/2/events","html_url":"https://github.com/fawda123/ggord/issues/2","id":101428025,"number":2,"title":"Small things to fix...","user":{"login":"fawda123","id":3086881,"avatar_url":"https://avatars.githubusercontent.com/u/3086881?v=3","gravatar_id":"","url":"https://api.github.com/users/fawda123","html_url":"https://github.com/fawda123","followers_url":"https://api.github.com/users/fawda123/followers","following_url":"https://api.github.com/users/fawda123/following{/other_user}","gists_url":"https://api.github.com/users/fawda123/gists{/gist_id}","starred_url":"https://api.github.com/users/fawda123/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/fawda123/subscriptions","organizations_url":"https://api.github.com/users/fawda123/orgs","repos_url":"https://api.github.com/users/fawda123/repos","events_url":"https://api.github.com/users/fawda123/events{/privacy}","received_events_url":"https://api.github.com/users/fawda123/received_events","type":"User","site_admin":false},"labels":[],"state":"open","locked":false,"assignee":null,"milestone":null,"comments":1,"created_at":"2015-08-17T14:06:23Z","updated_at":"2015-08-19T15:01:58Z","closed_at":null,"body":"1.\r\n```r\r\nlibrary(ade4)\r\nord <- dudi.pca(iris[, 1:4], scannf = FALSE, nf = 2, center=TRUE, scale=TRUE)\r\nggord(ord, iris$Species) # TO DO: something wrong here with explained variance and scaling (different than prcomp, PCA and princomp)\r\n\r\n# this gives the correct result :\r\nlibrary(\"devtools\")\r\ninstall_github(\"kassambara/factoextra\")\r\nlibrary(\"factoextra\")\r\nord <- dudi.pca(iris[, 1:4], scannf = FALSE, nf = 2, center=TRUE, scale=TRUE)\r\nfviz_pca_biplot(ord,  # gives the correct result\r\n                habillage = iris$Species, addEllipses = TRUE,\r\n                col.var = \"red\", alpha.var =\"cos2\",\r\n                label = \"var\") \r\n# see factoextra/R/get_pca.R\r\n```\r\n\r\n2. for dudi.coa\r\n```r\r\n# dudi.coa\r\nlibrary(ade4)\r\nord <- dudi.coa(iris[, 1:4], scannf = FALSE, nf = 4)\r\nggord(ord, iris$Species) # TO DO: scaling correct but %s on axes not correct\r\nfviz_ca_biplot(ord,  # correct solution\r\n               habillage = iris$Species, addEllipses = TRUE,\r\n               col.var = \"red\", label = \"var\")\r\n# see factoextra/R/get_ca.R\r\n```\r\n\r\n3.\r\n```r\r\n# ca\r\nlibrary(ca)\r\nord <- ca(iris[, 1:4])\r\nggord(ord, iris$Species) # TO DO: scaling not correct, %s on axes correct\r\nfviz_ca_biplot(ord,  # correct solution\r\n               habillage = iris$Species, addEllipses = TRUE,\r\n               col.var = \"red\", label = \"var\") \r\n# see factoextra/R/get_ca.R\r\n```\r\n\r\n4.\r\n```r\r\n# acm\r\nlibrary(ade4)\r\nord <- dudi.acm(tea[, -1], scannf = FALSE)\r\nggord(ord, tea$Tea) # TO DO: similar to MCA, but %s on axes not correct\r\nfviz_mca_biplot(ord,  # correct solution\r\n                habillage = tea$Tea, addEllipses = TRUE,\r\n                col.var = \"red\", label = \"var\")\r\n# see factoextra/R/get_mca.R\r\n```\r\n\r\n5.\r\n```r\r\n# mca\r\nlibrary(MASS)\r\nord <- mca(tea[, -1])\r\nggord(ord, tea$Tea) # TO DO: scaled differently as MCA and %s on axes not correct, mistake here?\r\n# see factoextra/R/get_mca.R\r\n```"},"comment":{"url":"https://api.github.com/repos/fawda123/ggord/issues/comments/132630819","html_url":"https://github.com/fawda123/ggord/issues/2#issuecomment-132630819","issue_url":"https://api.github.com/repos/fawda123/ggord/issues/2","id":132630819,"user":{"login":"fawda123","id":3086881,"avatar_url":"https://avatars.githubusercontent.com/u/3086881?v=3","gravatar_id":"","url":"https://api.github.com/users/fawda123","html_url":"https://github.com/fawda123","followers_url":"https://api.github.com/users/fawda123/followers","following_url":"https://api.github.com/users/fawda123/following{/other_user}","gists_url":"https://api.github.com/users/fawda123/gists{/gist_id}","starred_url":"https://api.github.com/users/fawda123/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/fawda123/subscriptions","organizations_url":"https://api.github.com/users/fawda123/orgs","repos_url":"https://api.github.com/users/fawda123/repos","events_url":"https://api.github.com/users/fawda123/events{/privacy}","received_events_url":"https://api.github.com/users/fawda123/received_events","type":"User","site_admin":false},"created_at":"2015-08-19T15:01:58Z","updated_at":"2015-08-19T15:01:58Z","body":"item one done..."}}