File:Progpreg.png

From 太極
Jump to navigation Jump to search

Original file(800 × 1,200 pixels, file size: 193 KB, MIME type: image/png)

Summary

library(magick)
u <- c("https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image001.jpg",
       "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image003.jpg", 
       "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image005.jpg", 
       "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image006.jpg")
x1 <- image_read(u[1])
x2 <- image_read(u[2])
x3 <- image_read(u[3])
x4 <- image_read(u[4])
imgU <- image_append(image_scale(c(x1, x2), "x400"))
imgD <- image_append(image_scale(c(x3, x4), "x400"))
img <- image_append(image_scale(c(imgU, imgD), "x400"), stack = T)
image_write(img, path = "~/Downloads/img.png", format = "png")

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current10:48, 24 September 2020Thumbnail for version as of 10:48, 24 September 2020800 × 1,200 (193 KB)Brb (talk | contribs)<pre> library(magick) u <- c("https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image001.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image002.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image003.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image004.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image005.jpg", "https://ww...
09:07, 24 September 2020Thumbnail for version as of 09:07, 24 September 2020800 × 800 (118 KB)Brb (talk | contribs)<pre> library(magick) u <- c("https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image001.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image003.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image005.jpg", "https://www.ncbi.nlm.nih.gov/books/NBK402284/bin/prognostic_predictive-Image006.jpg") x1 <- image_read(u[1]) x2 <- image_read(u[2]) x3 <- image_read(u[3]) x4 <- image_read(u[4]) imgU <- image_append(image_s...

There are no pages that use this file.

Metadata