Publications | Jihong Zhang – Jihong Zhang, Ph.D.

Figure 1 shows the number of citation by year.

Journal Articles

2025

Zhang, J.

International Journal of Disability, Development and Education

Zhang, J.

Journal of Special Education Technology

2024

Zhang, J.

International Journal of Eating Disorders

Zhang, J.

Journal of Educational Measurement

Zhang, J.

PsyArXiv Preprints

Zhang, J.

Behavior Research Methods

Zhang, J.

Frontiers in Education

Zhang, J.

Journal of Clinical Psychology

Zhang, J.

Assessment

Zhang, J.

Journal of Affective Disorders

Zhang, J.

Machine Learning, Natural Language Processing, and Psychometrics

2023

Zhang, J.

International Journal of Mental Health and Addiction

Zhang, J.

Autism

Zhang, J.

Current Psychology

Zhang, J.

Journal of Educational Measurement

2022

Zhang, J.

Journal of International Special Needs Education

Zhang, J.

OSF

Zhang, J.

Zhang, J.

Educational and Psychological Measurement

Zhang, J.

Structural Equation Modeling: A Multidisciplinary Journal

2021

Zhang, J.

OSF

Zhang, J.

Frontiers in Psychology

Zhang, J.

Medical Teacher

Zhang, J.

AL JOUR

Zhang, J.

SCIREA, Journal of Sociology

Zhang, J.

Teaching and Teacher Education

Zhang, J.

Professional Development in Education

2020

Zhang, J.

Multivariate behavioral research

Zhang, J.

Multivariate behavioral research

2018

Zhang, J.

University of Kansas

Citations

Figure 1: Histogram of Citations by Year

---
title: "Publications | Jihong Zhang"
sidebar: false
toc: false
execute: 
  eval: true
  echo: false
format: 
  html:
    code-tools: true
    code-fold: false
    comments: false
---

```{r setup}
#| message: false
library(scholar)
library(ggplot2)
library(dplyr)
library(stringr)
library(htmltools)
```

```{r compile_data}
#| include: false

# "MbRDAB4AAAAJ" is my Google scholar id, which can be found in your Google scholar URL address
# For example, my Google scholar webpage has the URL "https://scholar.google.com/citations?user=MbRDAB4AAAAJ&hl=zh-CN"
# Text after "user=" is your ID
# get_publication_url(id = "MbRDAB4AAAAJ", pub_id = pubs$pubid[2])
pubs <- scholar::get_publications("MbRDAB4AAAAJ", sortby = "year") 
pubs <- pubs |> 
  mutate(
    URL = get_article_scholar_url(id = "MbRDAB4AAAAJ", pubid = pubid)
  ) |> 
  arrange(desc(year)) |> 
  mutate(
    pubs_formated = paste0(str_replace(format_publications("MbRDAB4AAAAJ"), "Zhang, J.", "**Zhang, J.**"))
  ) |> 
  select(title:number, year, pubs_formated, URL)
```

```{r total_paper}
## Dynamically display the histogram of number of publications
pubs_count_byyear <- pubs |> 
  count(year) |> 
  arrange(desc(year)) |> 
  mutate(n_cum = cumsum(n))

# total_publication <- paste0("In total, I've published ", nrow(pubs), " papers. ")
# p(total_publication)
```

```{r dynamic_plot}
library(dygraphs)
pubs_count_ts <- pubs_count_byyear |> arrange(year) |> mutate(n_cum = cumsum(n))

## Refer to https://rstudio.github.io/dygraphs/
dygraph(pubs_count_ts, 
        xlab = "Year",
        main = "Jihong: Number Publications by Year") |>
  dyAxis("y", label = "Number of publications", valueRange = c(0, max(pubs_count_ts$n_cum) + 5)) |> 
  dySeries("n_cum", label = "Cumulative Number")  |> 
  dySeries("n", label = "Number")  |> 
  dyOptions(colors = RColorBrewer::brewer.pal(3, "Set2")) |> 
  dyOptions(axisLineWidth = 1.5, fillGraph = TRUE, drawPoints = TRUE, pointSize = 3) |> 
  dyHighlight(highlightCircleSize = 5, 
              highlightSeriesBackgroundAlpha = 0.4,
              hideOnMouseOut = FALSE)
```

@fig-citation shows the number of citation by year.

## {{< fa pencil >}} Journal Articles

::: nice-paragraph
```{r}
#| echo: false
#| results: asis
#| warning: false

# https://github.com/sonsoleslp/sonsoleslp.github.io/blob/main/publications.qmd

pubs_formated <- pubs$pubs_formated
for (y in 1:nrow(pubs_count_byyear)) {
  print(h3(pubs_count_byyear$year[y]))
  
  index_min = ifelse(y == 1, 1, pubs_count_byyear$n_cum[y-1] + 1)
  index_max = pubs_count_byyear$n_cum[y]
  for (i in index_min:index_max) {
    cat("\n\n")
    print(tags$ul(pubs_formated[i], a(class = "fa-brands fa-google-scholar fa-sm", href = pubs$URL[i], style="color: #74C0FC;")) , style="padding-left: 3rem")
  }
}
```
:::

## Citations

```{r}
#| label: fig-citation
#| fig-cap: "Histogram of Citations by Year"
cit <- get_citation_history('MbRDAB4AAAAJ') # the Google Scholar ID
ggplot(cit,aes(x=year,y=cites))+
  geom_bar(stat='identity')+
  geom_label(aes(label = cites)) +
  theme_classic()+
  xlab('Year of citation')+
  ylab('Google Scholar\n cites')+
  annotate('text',label=format(Sys.time(), "%Y-%m-%d %H:%M:%S %Z"),x=-Inf,y=Inf,vjust=1.5,hjust=-0.05,size=3,colour='gray')
```