{"action":"created","issue":{"url":"https://api.github.com/repos/rstudio/rstudio/issues/3162","repository_url":"https://api.github.com/repos/rstudio/rstudio","labels_url":"https://api.github.com/repos/rstudio/rstudio/issues/3162/labels{/name}","comments_url":"https://api.github.com/repos/rstudio/rstudio/issues/3162/comments","events_url":"https://api.github.com/repos/rstudio/rstudio/issues/3162/events","html_url":"https://github.com/rstudio/rstudio/issues/3162","id":341601050,"node_id":"MDU6SXNzdWUzNDE2MDEwNTA=","number":3162,"title":"Problem with identify() in RStudio, works fine in RGui","user":{"login":"Ghotitox","id":41301547,"node_id":"MDQ6VXNlcjQxMzAxNTQ3","avatar_url":"https://avatars3.githubusercontent.com/u/41301547?v=4","gravatar_id":"","url":"https://api.github.com/users/Ghotitox","html_url":"https://github.com/Ghotitox","followers_url":"https://api.github.com/users/Ghotitox/followers","following_url":"https://api.github.com/users/Ghotitox/following{/other_user}","gists_url":"https://api.github.com/users/Ghotitox/gists{/gist_id}","starred_url":"https://api.github.com/users/Ghotitox/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/Ghotitox/subscriptions","organizations_url":"https://api.github.com/users/Ghotitox/orgs","repos_url":"https://api.github.com/users/Ghotitox/repos","events_url":"https://api.github.com/users/Ghotitox/events{/privacy}","received_events_url":"https://api.github.com/users/Ghotitox/received_events","type":"User","site_admin":false},"labels":[],"state":"open","locked":false,"assignee":null,"assignees":[],"milestone":null,"comments":1,"created_at":"2018-07-16T17:05:50Z","updated_at":"2018-07-17T13:46:11Z","closed_at":null,"author_association":"NONE","body":"<!-- This issue tracker is for bugs and feature requests in the RStudio IDE. If you're having trouble with R itself or an R package, see https://www.r-project.org/help.html, and if you want to ask a question rather than report a bug, go to https://community.rstudio.com/. Finally, if you use RStudio Server Pro, get in touch with our Pro support team at support@rstudio.com.\r\n\r\nIf you're here to report a bug in RStudio, please take the time to fill out as much of the below as you're able so that we can reproduce the problem you're seeing.  -->\r\n\r\n### System details\r\n\r\n    RStudio Edition :  Desktop\r\n    RStudio Version : 1.1.453 (but not a new issue, happening since I first tried this in April 2018)\r\n    OS Version      :  Windows 10\r\n    R Version       :  3.5.1 (but not a new issue, happening since I first tried this in April 2018)\r\n\r\n### Steps to reproduce the problem\r\ninstall.packages(\"titanic\")\r\nlibrary(titanic)\r\ndata1<-titanic_train\r\nplot(data1$Age~data1$Fare, pch=16,col=data1$Pclass,xlim=c(-150,550))\r\nidentify(data1$Age,data1$Fare,labels=data1$Name,tolerance=1)\r\nTry clicking on any points with a fare over 125.  Clicking points on the far left of the plot seems to work, but would like to label the points on the far right. \r\n\r\n\r\n### Describe the problem in detail\r\nError: \"warning: no point within 0.25 inches\"\r\nTO try to find a workaround, I have tried changing the xlim, changing the label value, point type, and changing the tolerance. Labels work perfectly fine in standard RGui.\r\n\r\nI have seen similar issues reported before, but those particular examples seem to work fine now- this one seems to be new.\r\n\r\n### Describe the behavior you expected\r\nI expect it to label the points with the Passenger Name (or anything else one might choose).\r\n\r\n<!-- Depending on the problem, the following may also be helpful\r\n\r\nfunction (package = NULL) \r\n{\r\n    z <- list()\r\n    z$R.version <- R.Version()\r\n    z$platform <- z$R.version$platform\r\n    if (nzchar(.Platform$r_arch)) \r\n        z$platform <- paste(z$platform, .Platform$r_arch, sep = \"/\")\r\n    z$platform <- paste0(z$platform, \" (\", 8 * .Machine$sizeof.pointer, \r\n        \"-bit)\")\r\n    z$locale <- Sys.getlocale()\r\n    if (.Platform$OS.type == \"windows\") {\r\n        z$running <- win.version()\r\n    }\r\n    else if (nzchar(Sys.which(\"uname\"))) {\r\n        uname <- system(\"uname -a\", intern = TRUE)\r\n        os <- sub(\" .*\", \"\", uname)\r\n        z$running <- switch(os, Linux = if (file.exists(\"/etc/os-release\")) {\r\n            tmp <- readLines(\"/etc/os-release\")\r\n            t2 <- if (any(startsWith(tmp, \"PRETTY_NAME=\"))) sub(\"^PRETTY_NAME=\", \r\n                \"\", grep(\"^PRETTY_NAME=\", tmp, value = TRUE)[1L]) else if (any(startsWith(tmp, \r\n                \"NAME\"))) sub(\"^NAME=\", \"\", grep(\"^NAME=\", tmp, \r\n                value = TRUE)[1L]) else \"Linux (unknown distro)\"\r\n            sub(\"\\\"(.*)\\\"\", \"\\\\1\", t2)\r\n        } else if (file.exists(\"/etc/system-release\")) {\r\n            readLines(\"/etc/system-release\")\r\n        }, Darwin = {\r\n            ver <- readLines(\"/System/Library/CoreServices/SystemVersion.plist\")\r\n            ind <- grep(\"ProductUserVisibleVersion\", ver)\r\n            ver <- ver[ind + 1L]\r\n            ver <- sub(\".*<string>\", \"\", ver)\r\n            ver <- sub(\"</string>$\", \"\", ver)\r\n            ver1 <- strsplit(ver, \".\", fixed = TRUE)[[1L]][2L]\r\n            sprintf(\"%s %s %s\", ifelse(as.numeric(ver1) < 12, \r\n                \"OS X\", \"macOS\"), switch(ver1, `6` = \"Snow Leopard\", \r\n                `7` = \"Lion\", `8` = \"Mountain Lion\", `9` = \"Mavericks\", \r\n                `10` = \"Yosemite\", `11` = \"El Capitan\", `12` = \"Sierra\", \r\n                `13` = \"High Sierra\", \"\"), ver)\r\n        }, SunOS = {\r\n            ver <- system(\"uname -r\", intern = TRUE)\r\n            paste(\"Solaris\", strsplit(ver, \".\", fixed = TRUE)[[1L]][2L])\r\n        }, uname)\r\n    }\r\n    if (is.null(package)) {\r\n        package <- grep(\"^package:\", search(), value = TRUE)\r\n        keep <- vapply(package, function(x) x == \"package:base\" || \r\n            !is.null(attr(as.environment(x), \"path\")), NA)\r\n        package <- .rmpkg(package[keep])\r\n    }\r\n    pkgDesc <- lapply(package, packageDescription, encoding = NA)\r\n    if (length(package) == 0) \r\n        stop(\"no valid packages were specified\")\r\n    basePkgs <- sapply(pkgDesc, function(x) !is.null(x$Priority) && \r\n        x$Priority == \"base\")\r\n    z$basePkgs <- package[basePkgs]\r\n    if (any(!basePkgs)) {\r\n        z$otherPkgs <- pkgDesc[!basePkgs]\r\n        names(z$otherPkgs) <- package[!basePkgs]\r\n    }\r\n    loadedOnly <- loadedNamespaces()\r\n    loadedOnly <- loadedOnly[!(loadedOnly %in% package)]\r\n    if (length(loadedOnly)) {\r\n        names(loadedOnly) <- loadedOnly\r\n        pkgDesc <- c(pkgDesc, lapply(loadedOnly, packageDescription))\r\n        z$loadedOnly <- pkgDesc[loadedOnly]\r\n    }\r\n    z$matprod <- as.character(options(\"matprod\"))\r\n    es <- extSoftVersion()\r\n    z$BLAS <- as.character(es[\"BLAS\"])\r\n    z$LAPACK <- La_library()\r\n    class(z) <- \"sessionInfo\"\r\n    z\r\n}\r\n<bytecode: 0x000000000be2cc08>\r\n<environment: namespace:utils>\r\n\r\n1. The output of sessionInfo() \r\n2. The R code in question\r\n3. A diagnostics report; see https://support.rstudio.com/hc/en-us/articles/200321257-Running-a-Diagnostics-Report\r\n\r\nThank you for taking the time to file an issue!  -->\r\n"},"comment":{"url":"https://api.github.com/repos/rstudio/rstudio/issues/comments/405587440","html_url":"https://github.com/rstudio/rstudio/issues/3162#issuecomment-405587440","issue_url":"https://api.github.com/repos/rstudio/rstudio/issues/3162","id":405587440,"node_id":"MDEyOklzc3VlQ29tbWVudDQwNTU4NzQ0MA==","user":{"login":"ronblum","id":31009952,"node_id":"MDQ6VXNlcjMxMDA5OTUy","avatar_url":"https://avatars3.githubusercontent.com/u/31009952?v=4","gravatar_id":"","url":"https://api.github.com/users/ronblum","html_url":"https://github.com/ronblum","followers_url":"https://api.github.com/users/ronblum/followers","following_url":"https://api.github.com/users/ronblum/following{/other_user}","gists_url":"https://api.github.com/users/ronblum/gists{/gist_id}","starred_url":"https://api.github.com/users/ronblum/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/ronblum/subscriptions","organizations_url":"https://api.github.com/users/ronblum/orgs","repos_url":"https://api.github.com/users/ronblum/repos","events_url":"https://api.github.com/users/ronblum/events{/privacy}","received_events_url":"https://api.github.com/users/ronblum/received_events","type":"User","site_admin":false},"created_at":"2018-07-17T13:46:10Z","updated_at":"2018-07-17T13:46:10Z","author_association":"NONE","body":"Reproduced with RStudio Desktop 1.1.453 and 1.2.830 using R 3.5.1 on MacOS 10.12.6 (Sierra), Windows 10, and Red Hat 7.5.\r\n\r\n@pascaloettli Thanks for reporting this. We'll check it out as we work on future development of RStudio."}}
{"actor":{"display_login":"ronblum"}}