当前位置：极客教程 > R语言 > R语言 问答 > R语言 如何使用R查找IP地址信息

R语言 如何使用R查找IP地址信息

R语言 如何使用R查找IP地址信息

在这篇文章中，我们将使用IPinfo API来提取IP信息。

IPinfo是一个免费的API，用来获取特定IP地址的信息，如他们的位置。我们将使用httr GET()来进行URL请求并将数据存储在一个变量中。现在我们需要JSON数据，所以我们必须将数据转换成char格式，因为GET()返回原始数据，所以我们需要使用rawToChar()，为了将char数据转换成JSON格式，我们将使用内置的jsonlite包fromJSON()。

注意： 如果你已经安装了软件包，你不需要在脚本中包括install.package()。

例子

# installing required packages
install.packages("httr")
install.packages("jsonlite")
 
# importing packages/libraries
library(httr)
library(jsonlite)
 
# storing url in a variable
# you can also pass the url directly in GET()
url1 = "https://ipinfo.io/161.185.160.93/geo"
 
# requesting raw data from URL using GET()
# and storing in data variable.
data <- GET(url1)
 
# converting raw data to char format.
rawdata <- rawToChar(datacontent)
 
# converting char data to json format.
jsondata <- fromJSON(rawdata)
 
# printing output
# we are using cat() instead of print function
# so that we can use new line
cat(paste("IP:", jsondataip,"\nCITY:",
          jsondatacity,"\nRegion:",
          jsondataregion,"\nCOUNTRY:",
          jsondatacountry,"\nCOORDINATES:",
          jsondataloc))
Bash

输出 。

IP: 161.185.160.93

CITY: New York City

Region: New York

COUNTRY: US

COORDINATES: 40.7143,-74.0060
Bash

例子:从用户那里手动获取输入信息

为了获得用户的输入，我们将使用readline()，并使用as.character()将其转换为字符。现在我们将使用paste0()来完成URL，并将其传递给GET()函数。

# installing required packages
install.packages("httr")
install.packages("jsonlite")
 
# importing packages/libraries
library(httr)
library(jsonlite)
 
# storing incomplete url in a variable
url = "https://ipinfo.io/"
 
# manually taking ip as a input from user
ip = readline("Enter your IP address:")
 
# converting input ip address to character
ip = as.character(ip)
 
# completing url
url1 = paste0(url,ip,"/geo")
 
# requesting raw data from URL using GET()
# and string in rawdata variable.
rawdata <- GET(url1)
 
# converting raw data to char format.
chardata <- rawToChar(rawdatacontent)
 
# converting char data to json format.
jsondata <- fromJSON(chardata)
 
# printing output
# we are using cat() instead of print function
# so that we can use new line
cat(paste("IP:", jsondataip,"\nCITY:",
          jsondatacity,"\nRegion:",
          jsondataregion,"\nCOUNTRY:",
          jsondatacountry,"\nCOORDINATES:",
          jsondataloc))
Bash

输出 。

Enter your IP address:161.185.160.93

IP: 161.185.160.93

CITY: New York City

Region: New York

COUNTRY: US

COORDINATES: 40.7143,-74.0060
Bash

Python教程

Python 教程

Python 教程
Tkinter 教程

Tkinter 教程
Pandas 教程

Pandas 教程
NumPy 教程

NumPy 教程
Flask 教程

Flask 教程
Django 教程

Django 教程
PySpark 教程

PySpark 教程
wxPython 教程

wxPython 教程
SymPy 教程

SymPy 教程
Seaborn 教程

Seaborn 教程
SciPy 教程

SciPy 教程
RxPY 教程

RxPY 教程
Pycharm 教程

Pycharm 教程
Pygame 教程

Pygame 教程
PyGTK 教程

PyGTK 教程
PyQt 教程

PyQt 教程
PyQt5 教程

PyQt5 教程
PyTorch 教程

PyTorch 教程
Matplotlib 教程

Matplotlib 教程
Web2py 教程

Web2py 教程
BeautifulSoup 教程

BeautifulSoup 教程

Java教程

Java 教程

Java 教程

Web教程

HTML 教程

HTML 教程
CSS 教程

CSS 教程
CSS3 教程

CSS3 教程
jQuery 教程

jQuery 教程
Ajax 教程

Ajax 教程
AngularJS 教程

AngularJS 教程
TypeScript 教程

TypeScript 教程
WordPress 教程

WordPress 教程
Laravel 教程

Laravel 教程
Next.js 教程

Next.js 教程
PhantomJS 教程

PhantomJS 教程
Three.js 教程

Three.js 教程
Underscore.JS 教程

Underscore.JS 教程
WebGL 教程

WebGL 教程
WebRTC 教程

WebRTC 教程
VueJS 教程

VueJS 教程

数据库教程

SQL 教程

SQL 教程
MySQL 教程

MySQL 教程
MongoDB 教程

MongoDB 教程
PostgreSQL 教程

PostgreSQL 教程
SQLite 教程

SQLite 教程
Redis 教程

Redis 教程
MariaDB 教程

MariaDB 教程

图形图像教程

Vulkan 教程

Vulkan 教程
OpenCV 教程

OpenCV 教程

大数据教程

R语言 教程

R语言 教程

开发工具教程

Git 教程

Git 教程
VSCode 教程

VSCode 教程
Docker 教程

Docker 教程
Gerrit 教程

Gerrit 教程
Excel 教程

Excel 教程

计算机教程

Go语言 教程

Go语言 教程
C++ 教程

C++ 教程

R语言 精品教程

登录

找回密码？

注册