어떻게 화면 해상도를 얻을 수 있습니까?

Question

화면 해상도 (높이, 너비)를 픽셀 단위로 얻을 수있는 방법은 무엇입니까?

Answer 1

당신은 당신은 여러 개의 화면으로 system

(scr_width <- system("wmic desktopmonitor get screenwidth", intern=TRUE)) 
# [1] "ScreenWidth \r" "1440   \r" "\r" 
(scr_height <- system("wmic desktopmonitor get screenheight", intern=TRUE)) 
# [1] "ScreenHeight \r" "900   \r" "\r" 

과 결과를 캡처 할 수 WMI

> system("wmic desktopmonitor get screenheight") 
ScreenHeight 
900 

에 commad 줄 인터페이스를 사용할 수, 출력은 예입니다

[1] "ScreenWidth \r" "1600   \r" "1600   \r" "" 

우리는 처음과 마지막 값을 제외한 모든 원하는 나중에 윈도우 8에서 작동하지 않습니다 대답을 허용 번호

as.numeric(c(
    scr_width[-c(1, length(scr_width))], 
    scr_height[-c(1, length(scr_height))] 
)) 
# [1] 1440 900 

Answer 2

GetSystemMetrics은 SM_CXSCREEN과 SM_CYSCREEN입니다. 기본 디스플레이 모니터의 화면 너비/높이를 픽셀 단위로 반환합니다.

DWORD dwWidth = GetSystemMetrics(SM_CXSCREEN); 
DWORD dwHeight = GetSystemMetrics(SM_CYSCREEN); 

Answer 3

그것은 자바 스크립트와 함께 쉽게 : 당신은 그냥

window.screen.height 
window.screen.width 

당신은 OmegaHat에서 SpiderMonkey 패키지를 사용하여 R에서 자바 스크립트를 호출 할 수 있습니다 않습니다.

---

또한 solve this with Java 수, 그리고 액세스 할 rJava 패키지를 사용합니다.

library(rJava) 
.jinit() 
toolkit <- J("java.awt.Toolkit") 
default_toolkit <- .jrcall(toolkit, "getDefaultToolkit") 
dim <- .jrcall(default_toolkit, "getScreenSize") 
height <- .jcall(dim, "D", "getHeight") 
width <- .jcall(dim, "D", "getWidth") 

Answer 4

로 변환. 당신이 길이 2 벡터를해야합니다 이제

suppressWarnings(
    current_resolution <- system("wmic path Win32_VideoController get CurrentHorizontalResolution,CurrentVerticalResolution /format:value", intern = TRUE) %>% 
     strsplit("=") %>% 
     unlist() %>% 
     as.double() 
) 
    current_resolution <- current_resolution[!is.na(current_resolution)] 

:

사용이 :로

system("wmic path Win32_VideoController get VideoModeDescription,CurrentVerticalResolution,CurrentHorizontalResolution /format:value")

당신이 벡터의 해상도를 화면 얻으려면, 당신은 그것을 구현할 수

을

> current_resolution 
[1] 1920 1080