gzcon

R Base 3.6.2 🇮🇩 Bahasa Indonesia

gzcon menyediakan koneksi yang dimodifikasi yang menggabungkan koneksi yang ada, dan mendekompresi pembacaan atau kompresi penulisan melalui koneksi tersebut. Header gzip standar diasumsikan.

Syntax

gzcon(con, level = 6, allowNonCompressed = TRUE, text = FALSE)

Arguments

Parameter	Deskripsi
`con`	a connection.
`level`	integer between 0 and 9, the compression level when writing.
`allowNonCompressed`	logical. When reading, should non-compressed input be allowed?
`text`	logical. Should the connection be text-oriented? This is distinct from the mode of the connection (must always be binary). If TRUE, pushBack works on the connection, otherwise readBin and friends apply.

Return Value

Sebuah objek yang diwarisi dari kelas "koneksi". Ini adalah nomor sambungan yang sama seperti yang disediakan, namun dengan struktur internal yang dimodifikasi. Ini memiliki mode biner.

Details

Jika con terbuka maka koneksi yang dimodifikasi dibuka. Menutup koneksi wrapper juga akan menutup koneksi yang mendasarinya. Membaca dari koneksi yang tidak menyediakan header ajaib gzip sama dengan membaca dari koneksi asli jikaallowNonCompressed benar, jika tidak maka akan terjadi kesalahan. Output terkompresi akan berisi byte NUL yang tertanam, sehingga con tidak diizinkan menjadi textConnection yang dibuka dengan open = "w". Gunakan rawConnection yang dapat ditulis untuk mengompresi data menjadi variabel. Koneksi asli menjadi tidak dapat digunakan: objek apa pun yang menunjuk ke sana sekarang akan merujuk ke koneksi yang dimodifikasi. Oleh karena itu, sambungan baru perlu ditutup secara eksplisit.

Contoh

Example

# NOT RUN {
## Uncompress a data file from a URL
z <- gzcon(url("http://www.stats.ox.ac.uk/pub/datasets/csb/ch12.dat.gz"))
# read.table can only read from a text-mode connection.
raw <- textConnection(readLines(z))
close(z)
dat <- read.table(raw)
close(raw)
dat[1:4, ]
# }
# NOT RUN {
## gzfile and gzcon can inter-work.
## Of course here one would use gzfile, but file() can be replaced by
## any other connection generator.
zzfil <- tempfile(fileext = ".gz")
zz <- gzfile(zzfil, "w")
cat("TITLE extra line", "2 3 5 7", "", "11 13 17", file = zz, sep = "\n")
close(zz)
readLines(zz <- gzcon(file(zzfil, "rb")))
close(zz)
unlink(zzfil)

# }
# NOT RUN {
<!-- % Cygwin seems to require a different name -->
# }
# NOT RUN {
zzfil2 <- tempfile(fileext = ".gz")
zz <- gzcon(file(zzfil2, "wb"))
cat("TITLE extra line", "2 3 5 7", "", "11 13 17", file = zz, sep = "\n")
close(zz)
readLines(zz <- gzfile(zzfil2))
close(zz)
unlink(zzfil2)
# }